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Hlroldal- egy turb6val, amely mag a a gep! 

Utazts szfmitdgtppaf- egy palyazatra 6rkezett program, amely egy reg. problema egy*. ha nem is tokeletes. de hasznalhato megoldasa 
Rendhagyd posta - egy levelben foltett kerdesre valaszolunk hosszan es kitarttfan Annyira hosszan, hogy az mar nem is posta . 
LbvSIv&Ms - egy olvas6, aki a Digirext szerzoje, sertve 6rezte rnagat egy fel mondat miatt. Kozoljuk levelet a fe! mondat szerzSjehez, s 
annak valaszSt 

Hirom Prime etud egyik jobb. mint a mastk. de mmdenesetre mmdharom ugyanannak a szerzflnek a munkaja 

Programafa'nlat - VC20 F billentyuinek programoz£sa>a szolg^lb programocska, ameiy kfvansagra k^szult 

BIT-LET KARACSONY - A JO BORNAK IS KELL A REKLAM, EZ^RT HAT FELHfVASUNK M£G EGYSZERIJ! 

Kfinyvmoly - a valasztek nem semmiseg . Megragtunk ket konyvet, de nem tudjuk, kfnek sz6l . . Nem nekunk! 

Posta- amelyben kiadjuk a BIT-LET torteneteben el6szor a narancs dfjat. egy olyan apr6sagert. amelytfil mmdenki a padl6n volt! 

PLUS 4 nyer&- egy uj harom honapos palySzat, amelynek ez az els6 fordulbja! 
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Ugy gondoljuk, hogy a palyazatban r6szt nem vett 
olvasoink sz£m£ra is hasznos, tanulsagos a kovet- 
kezo 6rt6kel6s 6s a kozolt program attekintese. 
A feladat lenyege a kovetkezo volt: 
K6szitsunk programot, mely a varosi (elsosorban 
pesti) tomegkozleked6sben seglt nekunk, azaz 
,,megmondja", hogy valahonnan (pi. lakas) vala- 
hova (pi. munkahely) hogy tudunk a leggyorsabban 
eljutni (persze atlagosan !). 

Rajzoljuk le a Iehets6ges utvonalakat az 6bran lat- 
hatd m6don, s a vonalakra frjuk r6, hogy melyik 
kozleked6si eszkozt jelk6pezi, az atlagosan hany 
percenk6nt jar, s a kovetkezo pontig mennyi az 
atlagos menetideje. Olyan programot k6runk, mely- 
be ezt az £brat valahogyan be lehet taplalni, s ki- 
szamitja, hogy melyik utvonalon a 1eg6rdemesebb 
mennunk, hogy 6runk oda leghamarabb. 
Az abrat 6s a tovabbr felt6teleket a BIT-LET feb- 
ruari sz6maban talalhatjak. (Otlet - 1986. febru6r 
?7.) 

Ugy tunik, ez a feladat igen nehez volt palyazdink- 
nak, illetve valoszmuleg a megirasara adott ido volt 
kev6s. Ugyanis rengeteg I6nyeg6ben jo, de nagyon 
baratsagtalan 6s sok f inormtasra szorulo programot 
kaptunk. A fo nehezsegek a kovetkezok voltak: 

1. Az adatok tarolasara talaljunk ki megfelelo struk- 
turakat. 

2. Legyen megfelelo adatbevitel, javftas. 

3. A feladatot alakitsuk at egyszeru legrdvidebb ut 
keres6s6re. 

4. Be kellett epfteni egy megfelelo, el6g gyorsan 
mukodo, legrovidebb utat kereso algoritmust. 

5- Prob6ljunk javaslatot adni konkret helyzetek- 
ben is. 

fi. A vegeredm6nyt megfelelo modon irjuk ki ! 
Olyan program nem erkezett, mely minden neh6z- 
s6get sikeresen tekuzdott volna. Az 1 . 6s a 3. szamut 
altalaban mindenki j6l elint6zte, taldn a legegysze- 



rubb atalakitas az, hogy ha egy busszal lehet menni 
A-bol B-be, 6s tovibb is B-bol C-be, akkor a g6p 
general egy kozvetlen A-C utat a megfelelo ada- 
tokkal. (Vigy£zni kell a szembe jov6 buszra tort6no 
atszallasoknal !) Ezut£n minden 6lre rafrjuk a ko- 
vet6si idokoz fel6nek 6s a menetidonek az 6sszeg6t, 
s kereshetjuk a legrovidebb utat. 
Voltak tobben (pi. az alabb kozolt program froja is), 
akik az atszallasokat vett6k kulon 6lnek r tehat no- 
velt6k a csomopontok szamat, s beiktattak koz6- 
juk olyan 6leket, melyek csak atszallast jelk6peznek. 
Ez a megoldas is jo, de a gepnek sok munkat ad, 
a gr^funk tobbszorosere novekszik! 
A 4. neh6zs6get is igen sokan Iekuzd6tt6k, de sajnos 
senki nem irta le pontosan, hogy milyen algoritmus- 
sal dolgozik. ISI6h6nyan Iegal6bb n6v vagy forras- 
hely szerint hivatkoztak az algoritmusra, fgy pi. 
Salamon Csaba, az alabbi program ir6ja D. Alcock 
konyv6b6l vette az algoritmust, Mivel ez a konyv 
valoszmuleg mindenki szamara hozzaf6rheto, fgy 
mi ink6bb egy masik lehetseges algoritmust irunk 
le, azt is uj feladatk6nt az utolso oldalon. 
Attol a n6hany palyazotol eltekintve, akik ugy le- 
egyszerusftett6k a feladatot, hogy m6r hasznalha- 
tatlan es 6rtelmetlen lett, illetve akiknek a prog- 
ramja rosszul futott; a legnagyobb neh6zs6get az 
adatbevitel, javftas okozta, Kevesen tudtak olyan 
beviteli modot talafni, amellyel ezt a sok adatot 
gyorsan 6s k6nyelmesen be lehet vinni. Azonban 
szinte senki nem csinalta meg azt, hogy barmikor 
(adatbevitel utan, legrovidebb ut kiirasa utan) meg- 
felelo formaban megn6zhessuk az altalunk beirt 
adatokat, s azokon k6nyelmesen javitgathassunk is. 
En6fkul a megn6zo-javito r6sz n6lkul a kulonben 
hasznos „adatok magnora" cfmu r6szeknek sem 
latjuk sok 6rtelm6t. 

Az 5. neh6zs6grdl annyit, hogy tobb p6ly6z6nk meg- 
pr6b6lta legydzni ezt is - tobb-kevesebb sikerrel. 
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A 6. neh6zs6g valoszinuleg csak az ido rovids6ge 
miatt volt az, mint utaltunk r6 a programok barat- 
sdgtalanok, a javaslatot sokan idoadatok n6fku1 
irtak ki, tobben nem engedik, hogy a csomoponto- 
kat elnevezziik, vagy hogy az utakra rairjuk a jar- 
muvet - el lehet kepzelni, hogy milyen lesz ezek 
utan a v6geredm6nyk6zl6s! 

S most lassuk az altalunk legjobbnak 6rzett prog- 
ramot, melyet Salamon Csaba, tiszak6cskei palya- 
z6nk irt C 64-re. 

A program hal6szamito algoritmusa Donald Alcock: 
Ismerd meg a BASIC nyelvet c. muveben a 106. ol- 
dalon leirt legrdvidebb ut szamftasa szerint mu- 
kodik. A legkedvezobb hasznAlhatosag 6rdek6ben a 
START- 6s a C£L-allom6sok fel vannak cser6lve, 
[gy az A tomb 2, oszlopa az adott csomdpont cGltot 
s/b\6 legrovidebb tavofsigat (id6) tartalmazza. Az 
ott leirt program azonban nem alkalmas arra, hogy 
egy rel6ci6n belul tdbb jarmfl kozleked6s6t is 
figyelembe vegye, valamint a csornoporvtokon tor- 
t6nd sts7al!asok er?6kelesere sern alkalmas ebben 
a formaban. 

Ezert szukseges a h£l6szamitas alapjaul letrehozni 
egy bovitett halot a kovetkezok szerint. 
Az adatbeviteln6l hasznalt hal6 r6szlete 

AZ ADATBEVITELNEL HASZNALT HALO RESZLETE 

3H STs 2M /T\ 2*2 /C\ 4/2 
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A bovitett halo ennek megfelelden a kovetkezo lesz 
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A bdvitett hdlo l6trehoz£s£rol a felhasznald nem 
szerez tudomast, az adatbeviteln6l 6s az eredm6- 
nyek kiiratasakor is az eredeti h6l6 jelol6sei az 

6rv6nyesek„ 

Kort&toz&sok : az eredeti halora vonatkoznak, 

f. Egy J6rmfi egy csom6pontba fegfeljebb egy ir6ny- 

b6l 6rkezhet, 6s egy iranyba indulhat tov£bb. 

Z Olyan csom6pont r amelyben csak be6rkezfi vagy 

csak tov6bbha1ad6 j^rmO van ertelrnezve, a start- 

6s a c6lillom6sok kiv6te16vel nem lehet. 

(Zbe*zki *0) 

3. A csom6pontok, valamint a j6rmGvek sz6m£ra 
vonatkoz6an a kovetkezd kor!6toz6snak kell 6rv6- 
nyesnek lenni 

CM - csomdpontok szama 
JM - j6rmGvek szama 

PC(i)-az i-edik csomdpontba beerkezd 6s az 
onnan tov6bbhalad6 jarmGvek sz6m6nak 
szorzata 

Zbe(i)*Zki(i) = PC(i) 
SC(i) - az i-edik csomdpontba be6rkez5 6s az 

onnan tov6bbhalad6 j6rmGvek osszege 
JM*25+CM*20+JM*CM*9+ 

CM CM 

23 2 SC(i)+6 2 PC(i)<32000 

Jelenleg CM ^=30 
JM<=20 
PC(i) mB x-=25 

SC(i)max-=10 

CM a start- 6s a c6l6llom6ssal egyutt, JM a gyalog- 
T6ssal egyutt 6rtend6. 



A korlatozasok a 80, 90, 450 sorok 6tirasaval a fenti 
6sszefugg6s figyelembev6tel6vel v6ltoztathat6k 
meg. 

4. A kovet6si idokre 6s kozvetlen utakra 0<t<=60. 
A program elfibb a CM 6s a JM 6rt6keket k6rj, majd 
az egyes j6rm0vek nev6t - JNf (JM) - 6s kbvet6si 
idej6t - JK(JM) - vaiamirtt a csomopontok n evert 
- CS$(CM) 

Ezutan a kozvetlen utakat k6ri j6rmuvenk6nt # teh6t 
eloszor be kell adni az osszes olyan utat. ahol gya- 
log megyiink, s igy tov6bb. A k6perny6 jobb oldal&n 
fel vannak sorolva a sorsz6mozott csomopontok, 
igy ©gy ut bevitel6nel a mettol 6s meddig k6rd6- 
sekre csak a megfelelo csomopont sorszam6val kell 
valaszolni. 

Ojabb jarmure a billentyuvel lehet 6tl6pni. 

A kozvetlen utakra vonatkozo adatokat a CS%(1 r 
JM, CM), illetve a B1(JM, CM) tombokben he- 
lyezi el. 

Az adatbevitel kozben ellenfirzi a PC(i) es az SC(i> 
6rt6keket. 0 ideju mat nem enged6lyez. Egy i^rmu- 
nek ugyanabba a csom6pontba be6rkez6s6t, ifletve 
ki- vagy tovabbinduias^t csak egyszer enged6lyazL 
Az adatbevitel u\&n ellenorzi a hSI6t szakad6si hely 
szempontj^b6l, majd Malakitja a bdvltett hal6 
A(N, 3} 6s B%< E r 2) tombjeit. 
N - a bovitett halo csomopontjainak a sa^^ma 
E - a bovitett halo utjainak Siama 
Ezutan meghatdroz^a az optim6lis utat, valamint a 
bovitett hal6 csom6pont]amak legkfsebb t6vofs6- 
g^t (ido) a c6lallom6stdl (v6rakoz6si id5=JK(J)/2). 
V6gezetul kiirja a fegjobb utat r J6rmGvef a csom6- 
pontig" alakban. 

Ezut£n 6t kell t6rni az egyes csom6pontokban ko- 

vetendd strat6giat segito r6szre. 

A kovetkezd inform&ciokat kell megadnunk: 

1. Melyik csomopontban vagyunk? (Itt is feJ van- 
nak sorolva a csom6pontok, csak a megfelelo cso- 
mdpont sorsz6mdt kell befrni.) 

A c6lallom6s kodj6t beirva a futas befejezSdik. 

2. Mennyi ideje tart&zkodunk itt? (TA) 

Az 6tlagos varakoz6si id6k m6dosit6sahoz sziiks6- 
ges 

JA(l)= ^mzi^ 

Ha JA(l)-0-JA(l)=0 

3. Mely ffrmuvek tart&zkodnak a csomdpontban ? 
Az itt megadott sorsz6moknak (itt ugyanis a j6r- 
muvek felsoro!6sa Iathat6 a k6perny6n, s abb6l keif 
sorszdm befras6val v6lasztani) megfelelo jarmGvek 

varako^asi ideje null&zodiki JA(l) = 0. 

Ha erre a k6rd6sre a gya1ogl6s kbdjat, azaz 0-t 

aduok, a program kifrja az adott csom6pontban a 

felt6teleknek rnegfelel6en valamennyi e csomd- 

pontb6l tovabbhalad6 j6rmG eset6n a c6l6flomis 

el6r6s6ig varhat6an szuks6ges id6t. 

Tetszdleges gomb nyom6s6ra az aktu6lis csomdpont 

k6rd6shez t6r vissza* 

A [>roaram kil6p6s eifitt Iehet6s6get nyujt CS$(CM) 
JN$(JM), JK(JM), CS%(1, JM, CM) 6s B1(JM, 
CM) tombok ment6s6re, 

Meglev6 illomany eset6n a magn6 6llomany elejere 
6llftasa ut6n RUN 3800-zal indlthatd- 
(Szln nines, hang van, RUN/STOP nines latUtva,} 
Fontosabb modulok: 

0-100 - szab61yok, korl6tok kiir6sa 

CM, JM bek6r6se 
1 00-1 80 - j6rmGvek nevei 6s j6rmGvek kovet6- 

si idejei 

JN$(JM) r JK(JM) 
200-280 - csomdpontok nevei 
CS$(CM) 

300-500 - kozvetlen utak utaz6si idej6nek 
bevitele 

(CS%(1, JM, CM); B1(JM, CM)) 




10 FRINT ,i ™a ,, TRB'U5> "KORLRTOZlRSOK " 

20 PRINT"»WSTflRT ES CEL. RLLOMRSOKKflL EG 

VUTT "TRB ■■; 52 > " MAX WSiOBUCSOMGFGNT " 

39 PRINT"M»MR RELRC I QKBRN SZEREPUD JRRMU 
VEK 8ZRMR " TRB <. 52 > " MRX ilHSHDG " 

40 PRINT":*»MRZ EGV C30M0P0NTRR ERKEZO E 
S R" 

50 PR I NT " MCSGMGPONTROL IHDULO JflRMUVEK S 
ZRMRNRK" 

60 PRINT " SZORZRTR MAX 3" 25 

62 FRINT" J>»*»riZ EGV CSOMOPOHTRR ERKEZO E 

S fl" 

65 P R I N T 1 ' MC S 0 MOP O H T R 0 L INDULO JflRMUVEK S 
ZRMRNRK " 

70 PRINT" OSSZEGE MRX S" 10 : QL-2 : MI =3 

80 PRINT " 30»HCSOMOPONTOK SZAMR " ; = QF= 1 2 : 
MR=30'= GOSUB, 10OG0 ; PRINT ; I FQF=0THEN 1 G 
90 CM=Q"i-l = PRIHT"m»lJRRMUVEK SZRMR 
= QF=12 : MR=2@ • GO SUB 10O00 ■ IFQF=0THEH 1 O 

95 tm=q:-:~i =oim cskci^ jm, cm ).bk: -Jri.cn >,cs 

* C CM ^JI1*<JM); JK < JM JR < JM > 

100 JM=Q"-:-l 'PRINT ' PRINT 11 WWWMHI SFOLVTR 

TRS TETSZ. EILLENTVURE" 

105 GETR* : IFfl*=""THEN103 

110 REM #** JflRMUVEK *#* 

120 PR I NT " riMST TRE < 1 2 > " JflRMUVEK. 

130 'PRINT"SORSZRM JRRMU NEV KOV 

ETESI I DO" 

135 FOR 1=1 T039 ■ PR I NT " — " j = NEXT = PRINT 

1 36 JM* < 0 > = " GVRLOG " = PR I NT0TRB < 8 > JM* £ 0 > ; 
140 PRINTTRE<2S>JK<0> : FOR J= 1 TO JM : PR I NT J T 
RB < 8 > ; -* QF - 1 3 : QL= 1 5 = GOSUB 1 00G0 

145 IFQF=0TNEN1 10 

1 50 JM* < J > =Q* 1 PR I NTTfJB C 29 '> ; : QF= 1 1 - Q.L=4 ; M 
1=0 MR=60 : GOSUB 10000 : IFQF=0THEHGGTO1 10 
160 JK <- J>=Q : PRINT 
165 NEXT 

170 POKE 7 32 > 5 = POKE 7 SI , 24 = 3VS65520 = PRINT" 

ISO GETR* I PR* ■= 11 " THEN 1 30 

2O0 REM ***CSOMOPONTOK*** 

210 PRINT l, H»SI ,, TRB< 12>" CSOMOPONTOK " 

220 PRINT"SORSZRM CSOMGPONT NEV" 

225 FOR 1 = 1 TO40 - PR I NT " - " ; : NEXT 

230 PR INTO, "START" : CS*<0 > =" STRRT" 

240 FOR C=1T0 CM-1 =PRINTC, - QF = 13 = QL=20 G 

OSUB100QGU IFQF=0THEN2OO0 

250 CS*< C > =Q* : I F C:= 1 9 THEN PR I NT " 71" : FP I NT " 

ii 

260^ PRINT = NEXT = PR I NT CM; "CEL" 

270 P0KE7S2, 5 : P0KE781 f 24 : SVS65520 = PRINT" 

mWimtfSHiBt=«C^4HHlt4m3iSli4 < UIJ^4il 

230 C3*'::CM:j = "CEL" =GETfl*= IFfl*=" " THEN2S0 
300 REM*#*KOZVETLEN UTflK#*# 

305 es:-:< 1 , 0 , cm > = 1 ■■ n=2 

310 FORJ=0TGJM •■ S=0 * PR I NT " r3MS" TRB 10> "KOZ 
VETLEN UTRK FELV ITELE" = PR I NT "UfflTCaOftKl 

316 GOSUB50Q0 : PGKE732, 10 = F0KE7S1 , 24 : SVS6 

5526 = PRINT" «<:<■<-> =KOVETKEZO JRRMU > " ; 

320 PR I NT " MMHMMIKSrS . P . C3 - P . MENET" = PR I NT " 

■wt*ni])nipaanaigm^a i i i if m 

330 IFS>14 THENPRINT" 71 H" 
333 S=S+1 = PRINT" 11 ; = MI=0 = MR=CM s QF = 12 = QL 
=2 = GOSUB 100G0 : IFQF=0THEN500 
34G CK=Q*: : PR I HTTRB (4)"- 11 ; = QF = 1 2 : GOSUB 1 9 
OGO = I FQF=0THEH50O 

350 CV=Q>: ; PR I HTTRB-:! 10> ; ■ QF-1 1 = QL=4 = MR=6G 
- GOSUB 100O0 : I FQF=0THEN500 
360 UT=Q ; REM*#*ELLENORZES**#* 
370 I FCSZ < 1 , J , CK > O0THEK480 
380 I FCSK < 0 , J CV > O0THEN4S0 
390 IFCV=CKORUT-0THEN4SS 
400 K 1 = 1 = K2=0 : V 1 =0 - V2= 1 ■ FOR Jfl=9T0 JM 
410 I FCSK < 1 , JFLt CK > OQTHENK 1 =K 1 ■+■ 1 
420 IFCSECS, JR - CK> O0THENK2=K2+1 
430 IFCS?i< 1 1 JR^ CV) O0THENV1=V1 + 1 
440 IFCSKO JR.' CV> <:>0THENV2=V2 + 1 
450 NEXT JR ■ IFK1*K2>250RV1+V2>250RK1+K2> 
1 0ORV 1 + V2> 1 OTHEN430 
460 CS'A c l , J , CK > =N = H=N+ 1 = CS"; < O , 
N+l :B1 < T..CV>=CK*10O+UT : PRINT 
43C-t PPINT pRINT >, nHTE:riS RDfiT 



J, CV>=N : 
GOT 0330 



N= 



"TjiiD GOTO 33G 

500 NEXT ■ CS'i < O .■ w / , -ii 

510 REM *##ELLENORZES,R/B TOMB MERETE** 

520 REM N=CSOMOPONTOK 3ZRMR R<H,3^ 

530 REM E=UTRK SZRMR B<E,2;' 

532 REM S=CEL CSOMOPOHT 

535 REM H=KEZDO CSOMOPOHT 

540 REM 

545 PR I NT " ^M.MflMfllS" TRB C. 1 6 > " ELLEHORZES " 

550 E=8- FOR J=0TOJM = FORC-STOCM : IFB 1 J , C < 
I-0THEHE=E+1 

560 NEXTC, J 

.<7(d FORC^OTOCM = K 1 =0 ■ V 1 =0 = FOR J=0TO JM 

530 rFcs-;<0, j .c:<oothenvi=vi + i 

530 IFCS;:(1 . J, C::<O0THENKt=Ki H 

600 NEXT J ■ P 1 ~V 1 *K 1 : IFP I =©THENPR I NT " rJXMHM 

h i b s, ci om o P on t . Kezdd 1 o 1 r o 1 " : end 

610 E=E t PI i NEXTC: ' DIMR(N, 3 > , B"i <E .■ 2 > 

620 REM *^*R TOMB ELOKESZITES**** 

63^ FOR 1^1 T ON : R I , J > = 1 ■ R c I , 2 ':■ = 1 MidOU = R < I 

,3>=0 RC I,0';'=0.-NEXT*Ra ,2>=@ 

640 s=l iH=N :REM***KEZD- ES VEGPONTQK*** 

790 REM+:#*KOZVETL.EN UTRK*** 

735 PR I NT " nHSPMPWAllSi" TRB < E! Ols'ESZ I TES . R 

ES B TOMB OK TOLTESE" jfl^. 

710 P =3 = FORJ-0TO JM ■■ FORC <MTO& v " E" : 1 

2S IF Bl C J ■ O=0THENi?SMB 

730 c i = i n r ■ : b i J , c > x i ^;^^Mm^j I B=t 



s-:o . j,ci> :R=eu t,c;-~ioci 

740 P=P4 1 ■ B"XP, 2>=G = BK-'Pifllv ■ HIT'" U 3 

:« ■ B"lv P , 1 =R C R , U > : R C R / 0 > 

750 NEXTC, J I 

OGO REM***RTSZRl LRSOK LRTS2f4-T MTR|:+4 + 

3 1 0 FOR J=0TO Tl-1 : FOPC=CMT' jO^TEP 1 

320 R=C3"^:i ■ T,C> : IFR=OTHEI'^^fc^ 

330 FOR JB=0TOJM = R=JK>:; J>/2 = V lfjB/C> 

340 I F B = 0 T H E N S 7 0 — 

350 IF J= JBTHENR^B: 

360 p=p + i^j::a- iZy^B 1 b-:<::p,0:' = !HT* 'iee*R+-5 
;< : t; p . i :> =u «■ i . 0 ■ "1 " n a > =p 

3; 7 0 NEXTTB M 

330 NEXTC> J KhL 
2O00 REM** ' 

210O PPINT'TflW^'if^lc;!" mi : A > "ITEll 03ZRM I TR 



^^30 
2250 



1=3 = GOTfflH 

1 = 1 : k:=k+I^ 

IFRC I > 1 >=0l 
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I O ■ IF ILI 

I 1 j-f r ■: j iB^^nSIr 

T, 2> = IF RC'L j 2 XT THEM2400 

1 = R < L j 2>^T = RCL ■ 3> = I 
J .. 1 > : IF JO0THEN2 7;40 
-0 : GO TO 2;": 50 

I TES VEGE*** 
G0T02515 
31 .■ 24 : SVS65520 - PRINT 
ILLENTYUREM" 
EN2512 

f\B f 1 5 > " LEG JOBB UTK" 
k lR':: 18> " CSOMOPOHT I G 11 
IT" - " : : NEXT = PRINT 
N2510 

PRIHTJMS^:: JFl> ; = X=fKCSE 

4ij0ri : p R I HI TBBXJ. S j C:i* C PR > 
JR CR^ , 3"^ = GOTO2540 
P0KE7S1 , 24 SVS65520 ■ rrv.M t 
SFOLVTRTRS TETSZ. EILLEHTVUREM" 
2S95 GETR* : IFR*= 11 11 THEH2595 
3000 REM #**TETSZ-CS-P-OPT-STRfiTEQIfl**# 
3010 REM CR=RKTURL IS CS.P. 
302S REM JRC >=CS.P.KI JflRMUVEK VRR. I DO 
r^gr=50 CI*="nM 33PTIMRLIS STRRTEGIR TETSZ, 
CSOMOPONTBRN" 
3040 PR I HTC I * = GOSUB5000 

:":045 POKE 732/ 5 : POKE 781 , 24 = SVS65520 = PRINT 
" STCM"=KERDEZES VEGE" ; 

:":050 PR I NT " SDOWMaRKTUflLIS CS . P . ? "TRB < 4»d > ; 
= OF= 12 = M I =0 : MR —CM ■ QL=2 = GOSUB 1 0000 
30^0 IFQF=0THEN300O 

ifq;:=cm then3650 

r:R=0"i : PR I NT : PR I NT " H" ; CS* < CR > : PR I NT " 



3070 
3080 

3O90 

3100 

JfU J 
3110 
3120 
3130 
3200 
3210 
TTRE 
3220 
Br: 



QL=4 : GOSUB 1O00O i IF QF=0THEN30O0 
TR=0 = FORJ=0TOJM : IFCS'-'-. 1 , J j CR> =0THEH 
= 10000 : G0T0312td 
jr,^ j ;> = ■:; JK ■:: J >-Tfl> X2 
I F JR J > <OTHEN JR <C J ■' =w 
NEXT 

PR INTO I* 

PR I NT " aaSMW" TRB < 20 > " SJflRMU VEKT " = PRIN 
13>i ■ FORI = 1 TO 16 : PRINT"-" > ■ NEXT 
PRINT : FORJ=0TOJM •■ PR I NT TRB < 1 S > " S" JTR 
11 JM*<: J> ' HE XT 
225 P0KE782 , 5 : P0KE7S 1 , 24 ; SVS65520 = PR INT 
" 3ID=RDRTBEV ITEL VEGE", 

3230 PRLlNT ,, ¥a«WWHaCSOMOPONTERN"TflE<40.? "TR 

f. i> -i- 1 i r »- ■ ■ - pp y n T " tf ii r<u i itfi^i amir' 11 ^ f sgiifi \ 



o-;. 4 t3 Oh = 12 : UOSME19QI30 : I F QF = 0 T HEN 3 ^ Q W 
3? ,c %0 ffi=fl";; X F ■ J R = 0 T HE H 3 5 0 0 

3255 iFCS:^::i,,m,CR;'=0THEKF'RIHT 1, Ill H I Bfit: 
RDRT 1 ' : OOTO3i=i40 

3260 .TRCJR>=0-FRINT"iaa "J JM*<JR> 1 G0TQ334 

11 ^iKnfiB^)^^SI(CR'.PRINTTRGC5)' 
j*rriiu"t.?.b(2e) "uU23.si ido ^ eel lg 
o S t ft F np I = 1 T039 : PR I NT " - " • : Nb/XT = PR I Nl _ _ _ 
35?0 FnR-T=RT0 JM = I FCS/- < 1 , J , CH > =0THEN3*Lttf 
-:!=;30 PR I NT JM* C J > TRE 20 > ft < CSK C 1 J . Ufi - : ' ■■ 2 -< H 
JFK J > TREK 30> "PERU" 

pnf E7S2 , 5 = F0KE7S 1- 24 = SVS65520 - PR 3 
" SFHLVT RTflS TETSZ. E I LLENTYUREiPl" 
3620 GETfl*: IFR*=" "THEN3620 
' -: 6 3 0 G 0 T 0 3 S 0 0 
3640 PR I NT "CI" 

:36 sft FPiNT ,, ^iEafiffnw i MB«ii»i'*iii^H 

SZ~IPD FI " =FORI = ITO30S : NEXT = 
3655 FORI = 1TO100 = NEXT = GETfl* : 

:^660 IF R £- < > " T HENEN D 
P.rn® REM MENTES 
3710 OPEN L L 1.- 11 1" 
3720 PRINT#1,CM 

3730 FPINT#1,JH _ -^-.-^ ,-,i-.t 

3749 FORI-STOl '■ FOR J~0TO-JM ■ FORL-0TOU1 : PR I 



[NT 



ME NT EN I RKRR 
= PR INT" " 
!F R*=" " THEN 



■ NEXTC -J , I 
; FORC=0TOCf'1 ; PR I NT# 1 



Bl( J, 



3765 
3770 
3730 
3300 
33 10 
3320 
3330 
3R:~:5 



= PR I NT* 1 
: PRINT#1 
= PR. I NT #1 



■ THi«:; J j ■ NEXTJ 
JK<J> : NEXT J 



s*<c: 



: NEXTC 



750 FOR-J=0TO JI-I 
O "NEXTC, J 
:-J760 FOR.J=0TO-TN = 
FOR-J=0TGJM : 
FORC=0TOCM : 
CLOSE 1 ■■ END 
REM TOLTES 
OPEN 1, 1,0, "1" 
INPUTttl , CM 
INPUTttl , JM 
DIM CS':-':i, JM,CM>,B1- 
JM* < JM > JK < J M > , JR < JM * _ _ _ T _ , T , 1C , 

3S40 FRR I=CHT01 - FOR J==STO JM : FuRU-wTuU1 : I HP 
UT#3 .CS'i':;i, J,C> = NEXTC, J, I 
3R!=;0 FOR T=0TO JM FORC=0TUCM = 



:jm, CM> ,CS*CCM> , 



INPUT#1,B1<: J, 



: NEXTC 
jo60 FOR. 



C> 



3370 
3330 

4BO0 
4010 

4020 
4040 
405U 
40t.O 
4070 

4100 

4200 
4300 
5000 
1 1 fl0 



.T 

T=@TOJM 
FORJ=0TOJt1 
FGRC— 0TOCM 
CLOSE 1 : N=C 



INPUT#1 , JM*C J? NEXT J 
INPUTttl , JK< J> NEXT J 

iNFUTtti , est- o: :> = nlxtc 

S"; < 0 ■ S , O j : G0T05 1 0 



JRRMU MEGTRLRLO 
TT HftLO RKTURLIS CSF 



REM CSOMOPONT 

REM BE*** 

REM X -&OVITE 

REM I -ERKEZES I=0,TRVuZHb 1=1 

REM KI*#* 

REM CR -RKTURLIS CSOMOPONT 

REM JR -RKTURLIS JRRMU 

FOR CR=0TOCM ; FOR JR=OTO JM 
IFCSXc" I . JR . CR><:>XTHENNEXTJR, CR 



RETURN 

REM*##C 30 MO PONT K 1 1 RU " 
PR I NT 11 aaKOflW" TRB < 20 ~s " S»r SUMOPuNTOK " : PR 
IMTTRE<20>; ■ FORI = 1 TO 19 ■ PRINT" - ,r ; NEXT _ 
^200 PRINT = FORC=0TOCM = PR INTTRBC 15 > " Sl l, CTR 

1^ ':,"«" r:S*0:::< = IFC=17 THENO=CM-l 
5300 NEXTC ■ RETURN 
1000O REM** INPUT USING** 

10060 P0KE54273, 63 ■ P0KE54273, 240 ■■ P0KE542 

, 1=; = P0KE54277, 15 : REM *HRHU ELOKESZ 
10O70 QF=QF-10 : I F Q F < 9 T HE N Q B =y = 0.$=" " ■ Q=0 ; 
GOT O10O95 

1 0075 I FQF C3THENQ=U?: 

100P.O PF^OF- 10= IF0F<STHENQ*=RIGHT*<STR*< 

Q>,LENCSTR$^Q> > -1> 

100-^0 QB^LENOI'.tf > ■ FRIHTQ* . ; 

1O095 I FQB=0THENPRINT " J 

1 P\ 1 0 ft I F QB <' y- QL. THENPO KE204 1 0 

ifilfl^ RETQ 1 -X- ■ IFQ1 ?■=" "THEN 10 100 

10110 POKE204 f 3 : PRINT " IS" , ■ IFQ1* =CHR* <. 1 3 

> TKEMGOT 019^00 

101 2^ I Ft" If -CNR* < 20 > RNDQ© OOT HE N g0 =PB- 1 I 

Q*»LEFT* ^'O* - QB) ■ r-RIHT "lii" i i GOTO 10055 

10125 IFaii="*» ,1 TMEN^F^0: RETURN 

10 1 3 @ T FCilf <CMR^ C 3 £ > OP 1 * > C HR* < 34 > 0R>; 1 *= 

CHM<34>OROl^"# M 0PQ1*=" • "THEN103QQ 

IS 135 IFQF=2RHD<:0:1* : >CHR*<57'>ORQ1*<CHR^^ 4 

3 >> THEN 103O0 

1 R 137 I FQF- 1 Rr ID < Q 1 $ I? CHR3"- < 57 } OR.U 1 * <CHR* v 4 
6 ';■ ORQ 1 * = 11 X " ) THEN 1 0300 

]. 0 1 40 IF QB<Q LTHEN QB = QB + 1 : UO T 0 1015 0 
ROTO 10300 

pi=ki$+Q l $ : PR I NTQ 1 * ; : UUTO 1 0095 
IFOF=3RNDCi^>" ! "THEN 18220 
I F QF C3T HE NQ= VRl„ <Q* ) 
rFQF=2RNDQ>32500THEN103Sy 
I FQF=30R Q CM I ORO>MR > THEN 1 0300 
IFQF=2THENQK=INTCQ> 
POKE 204 . 1 ■ RETURN 

P0KE54276 -17= FOR I = 1 TG50 = NEXT POKES 
16 ■ GOTUlk)0y5 



10145 
1016® 
in 200 

10202 

1 0^'05 
10210 

10215 
10220 

10300 

4276, 



- 360-490 - csomopontra vonatkozo 
korlatozasok ellenorz6se 

- felesleges csomopont v. szakadasi 
hely szerinti ellenorz^s 

- A(N r 3) tomb elok6szit6se 
c6l~start cs&rQ 

- A(N # 3) es B%(E, 2) tombok tolt6se 
(kdzvetlen utak) 

- A(N, 3) 6s B%(E, 2) tombok tolt^se 
(dtszallasok, Stutazasok) 

- halosz^mltds (Alcock konyv 
alapjan) 

- legjobb ut kifratasa 

- optimalis strat6gia tetszoleges cso- 
mopontban: kezdeti felt6telok be- 
k6rese 6s az optimdlis stratdgidt se- 
gfto adatok sz^mftSsa 

- optimalis strat6gia kiiratasa 

- mentis, ill. kil6p6s 

- visszatolt6s 

- csomdpontkeres6s 
(legjobb ut kifratdsahoz) 

- csom6pont kodt^blazat kiiratas 
10000-10300 - adatbek^ro rutin 
Adatbek6rd rutin: 
QF - funkcio kod 



510-600 

630 
640 

700-750 

800-880 

2000-2440 

2500-2590 
3000-3260 



3500-3630 
3640-3780 
3800-3880 
4000-4300 

5000-5300 



QF MOD 10=1 
QF MOD 10=2 
QF MOD 10=3 
INT(QF/10)=1 
INT (QF/10)=2 



QL 
Q 

Q% 

Q$ 
Ml 

MA 
QB 

Q1 



REAL 
INTEGER 
STRING 
uj adat 

r6gi adat kifrasa az adatbek6r6s 
eiott 

bek6rend5 karakterek 



be- , ill. kimenS adatok 



- als6 hatdr 

- fels6 hatar 

- mAr bevitt karakterek szdma 

- utolsonak bevitt karakter 
MegjegyzGsek: 

- Javitds csak DEL billentyuvel. 

- Kurzor vez6r!6k letiltva. 

- billentyQvel lehet egy szinttel magasabbra, 
illetve tovabbl^pni bizonyos esetekben. 

- Ha nem lehet tobb karaktert bevinnr, a kurzor 
nem villog. , , . 

- Adatbevitelt RETURN billentyuvel zfirjuk. 

- HasznSlat kozben tekintsunk n6ha a 25. sorban 
Iev6 kezel6si utasftasokra. 



NEW LINE 

C 16 - 64 



november ben 
lejAr az 1 Eves garancia.. 



MOST ERDEMES 
BEEPiTHETO BOVfT^ST 
RENDELNIE! 

Itt a legolcs6hbi 

2630 Ft 



I rjon ! Postactm : Z200 Vecs6s, Pi6f a u. 15^ 




A Post a rovarba iftene a* alabbtfevet, de 
man a vaVasz a srok&sosnSt bossxabbra 
is tifttekasebbre sikeredett, tigy g un- 
do ft uk, hogy tutnotte a rovat ksreteit. 
£z*rt t*U betota kvl&n vtdat 

Tisztelt Szerkeszttfaagl 
Tobb keTdessel fordtilok onokhoz A; 
egyik dri^si pronlemam, hogy Commo- 
dore 64 -es gepem van, 5 nem vagy ok 
megelegedve a gephez kaphato ctoku 
mentacidvaL Az egyetien ,.)6" gepkenyv 
az Ury -f£le ketkomten kdnyv Ezt* ara 
miatt egy k is szorke, polgaVi halando. 
mint e>i, nem tudja megvenni a zseh- 
penzeboi- 

MITDL ILVEN DRAGAK AZ eff£le 
KONYVEK? MITtiL JLVEW CSAPNIVA- 
LAAK;u Peidanak okaprt: ..Csodasan" 
be van irva a sprite-ke$zites. Pomp&s. 
rernek F Csak azt az FP egyet"' f !) nem ir- 
jau hogy milyen artekeket kail 
baPOKE-oIni PI. : a 832-esrji mtol kezdva. 
Egy at'ag sprite- nil ugye fgv vaiahogy - 
veszek egy 24*21 -es teglalapot, megter- 
vezem a/ a br st, atszarnltom az ertekeket 
2 $zamrend$zerbc r osszeadam az ogy 
sorhan levoket (24 8-3 db ilyen van 
egy sor ban), igy 63 adatot kapok. Na de 
honnan fudna az a szer encset le n gap, 
hogy en az abranak melyik reszet aka- 
rom pirosra fastens es melyifoet zoldre, 
vagy hupililara?! Ami a gepkonyvben 
szere&ef. bogy a DATA- kba A, 3, C betu 
ket irok, (mint a SJMON'S-ban) az sze- 
r intern annytra mukodokepes, mtnt 
amennyire aitakinthetS, megerthetfi. 
Ez«rt a penzert igazan vehetne a szerzo 
a ta radsagot, bogy ne szaknyetven (r- 
jon, ha nem nemi fiatalsagot befeszove, 
spoman magyarul Irjon 1 Nagy murks 
Jenne? Szbval az az 1, kerdesem- 
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A masodik ugyancsak snrite-tal kap- 
csolatos Ha az ember e loves? egy 
Slockkatalogust (az, ugy tudqm. nem 
szerepel a konyvbcn). hogy meg is mi- 
lyen clmtdl toltse be az adaiait. ranaz. 
as azt mondja. hoy y atyauristen E Fel 
nem fogom, hogy minak lahet ennyi? 
(Fzek Hoziii csak az afsd 4-et hasznal- 
hatorn szabadon, a tbbbit BASIC kezdo- 
cim eltofassaL) Csak tigy volna ertelme, 
ha a betdltott adatokat felvattya hasz- 
nalhatom. De hogyan?f A POKE 53263. 
sprite siirn a 2-ea szamrendszerben 
szerintem nam ha&znalhatd. Akkor mi, 
bogyan? Sejtelmem ainoa. 
Az otolso. immar nem annyira elma- 
rns?talo probtemam, hngv hogyan lehet 
hirdatni. Valami olyasmit olvastam. 
hogy aki bakutdi az eldfizetesi csekket 
(vagy micsodaT.) az mar dorzsolheti a te- 
nyeret s torheti a fajet, hogy mit is 
hirdessan. Hat ez kesz kiszurSs< Mint- 
hogy meg mindig a szurke polgarok 
ertekekben szeg^ny etetal elarn, csak 
a BIT-lET-es szamofeat i/RWBm, (Ami 
csak ritk^isan jelenik meg, mint a 
Loch hJess i szorny.J SzovbL mint mar 
em lite item ez kitolas (Tatszik latnL 
mar re meg a kezam: a szivlnfarktas 
else jelai.) SzovbL mint C 64-tulajdonas, 
szivesen vennem f el a kapes olatot mas, 
172 magas< lehetdleg 20 ev alatti fia- 
talokkal programcsere cafjabdl. 
Szerintern ^sszerQbb Tenna, ha mint rnas 
kfad^knil. p^nz elleniben fehetne hir- 
datni. Na nam olyan csillagsszeti bsz- 
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szeqekert, mint az EXPRESSZ-ben, csak 
amolyan ..jeEkepas osszegert'V 
OdvdzJattel Bogndr Akos r III, oazt. 
uimn tan. 1124 Budapest. Levenduta 
u. 20. 

Level a men folteU kerdisei kdzott akad- 
nak reszunkrdl megvalaszolhatatlanok h 
ilte eve o I yanok. amalyakre leg f elf ebb ve 
temanyunket mondhatjuk yl. 
"f. Ami a konyvek arat illetL ugy tunik, 
hogy ezaknek a kdnywaknek az £rat a ke- 
rn^iet-kinarat torvanyai szabSlyozzak. 
Ennyj^rt ia elmennek, A Turcsa csak az, 
hogy miert appen egyediil a azimitim- 
technikai konyvek ara alakul Egy ? 
2; Hogy melyik konyv csapnlval6 
melyik nam. ebben nem blztos. hogy 
egyet ertiink. Abban viszont igen. hogy 
jobb lanna. ha a konyvek mfiie! na^yobb 
szazalaka ir^dna a $zakmai ^bikkfa- 
nyelv" helyett kozarthetoan. 
J. A hjrdetesugyben ezuton kozoljuk 
dnnal is as o' vasosnhkal is. hogy apro- 
hrrdeteseike: csarabereiigyek ben. ha- 
sonld gepekkel fogtalkozd tarsak kflfft* 
sese ugyeben mar r^gdta mgyen es 
bermantve kdzeljuk. Semmifate eld- 
fizetof igazolas vagy elfble nem kail 
liozzi, 

vagiiln da nem u tols6sorban az igert 
hasznoa lnformaci6k. 

A mit a sprite kcie fSs he? m4g tudnr 

i r A la t halo kepernyd egy 320*300 da- 
rabb6l alio ponthalmaz. Ebb6f a sprite 
agyolyan lathato figure^ amelyet 24*21 
db pontb6l aliitunk assza, es leheEdse- 
gunk van arra, hogy Csak a knordinatak 
meghatarozasaval gyorsan (hardver 
uion] mozgassnk A sprite koordinatalt 
azonban egy 512*256 os teruiaten he- 
lyazhatjuk eL igy - arinyosan - a kep- 
ernyd ba> melyik oldalan klvulre is koor- 
dinalhatjuk, 

2* A *prite-okat nagyfelbonti&u tizem- 
mod ban vagy tobbszinO uzemmodban 
haszn^lhatjuk A nagyfeibontasu modot 
v&iasztva a 24*21 -es pontterulat minden 
pontj§t kjhesznilhatjuk. de tobbszm- 
rnodben az a Tela re csokken [12*21 -re) 
azdical, hogy a figure egyeilan lathato 
pontjat a rendelkezesunkre al!6 leriilet- 
b5J KlT ponttal hatarozzuk meg. s Igy 
szint is adhatunk neki a kovcikezo 
keppen; 

A $001 C regiszternek a sprite nak mag- 
falalo bitjet 1-re kelt ahitani. 

1 21 i 



Nagy feibontas 



a ft * a 



2. abra 



111 1* % D fl26 S2ineles2| | 
(10)= 3Z I-betu tdrzse 20 
a sprite sorszimhoz t^rtofo — 
regiszter szfnevel lasz azonos 
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l ■ % ipfiti 

Ezzal a regiszt arret bakapesokuk a spri- 
te tobbsfinu uzammddjat. {Ma feladjuk 
ilyenkor a Figuralia felbontas 12*21 I J 
Harmost megnezzuk a dupfasz^les pon 
tok jelentesgt, akkor mans szlnezni 
tudjuk a sprita-jaifikat: 
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Ha 3 bit par : 

00 - akkor a pont £zln* egysrik a hai 
ter szinevel 

01 - akkai a pont a $D025(G3Z85) regisz.- 
terbp vitt sziner tekktfl agyezik meg 
10- akkor a SD027 - $DG2E (53287-53294} 
regiszterek kozul az les* a i n meg ha- 
tar oz6 K a rnetyik a sprite so rszama szerint 
kovetkeiik, £ela6 sprite = S3Z07, maso* 
dtk sprite = 53288, stb.J 

11 - akkor a $D02G(53286)-os register- 
be vitt szin e* Lekfe szerint lesz szinezve- 
p|. az i-hotN alakfa nagyfalbontasu as 
tobbszinfi uzemmticfban a 2. a bran lat- 
hato (Felieteiezern e 24,21 -e& sprite 
terv&£§s§t &s khszamltasat az olvaso 
mar ismeri,) 

J. A megtervezett es kiszlnezett Bpffc 
le-ot mejj is keif jetenilanunk* Ehhez a 
SD015{53269) cimnek a sprite har tar 
XQ7& bitjet 1-be Ml alNtani ; 



1 Ujr.r*!, t I 

3 Hjr.tp I « *. 1 

I A Ku- -1p l.iftfl 

A figure rajzat az akiuaiis uidaoazelet- 
biii veszi a VIDEO-CHIP, megpedig abol 
a k^pernyotar van, annak az 1 Kbvte-oS 
teruifitnek az utolsri 8 byte-j£nak az 
ertekeit veszi alapul. [rVfegjegyz^s : a 
videoszelet, a membnabot Mvalasztott 
16 Kbyte osterulet. Kijeidlesea SDD00 
es £DD02-es cimekkel lehetseges, alap- 
allapctban a 0-adik cirntol veszi & me 
mdria lag a I ad 16 Kbyte-jat. Mivel a 
rendszer ezen a tarutetsn tialul S400-ro 
helyezi a kepernyftTar startcimet, lm a 
hozzaadou 1 Kbyte - 8 eredminye 
S7FB (decimalisan 2040) lesz. Ettol a 
cirntol kezdve belyezhetjuk el a sprtte-ok 
rajzahoz tartozO startcimekd- Ez az£rt 
is lahalsagas, mivel kepernyotamak 
e leg end a 40 25 1000 byte es igy a Tel- 
]es 1 Kbyte (=1024) nines igazan ki- 
hasznalva !) 

A sprite-okhoz rendelt 8 register irte- 
keit a kdvfctfcezdk^ppen aUEthatjuk be 
arra a startcimre. an ova a sprit e-ok rajz- 
adatait teny legesen iselfrelyezhct]uk ; 
A 16 Kbyte = 1 6.1 024-1S384 byto. Ha 
azt elosztjuk 2S6-tal, akkor 64- et ka- 
punk, azaz pont army it, amannyt 1 sprite 
abrazorasahoz etegendo. Ebbfil kovet- 
kezik, hogy 2&6 sprite-rajzot tudunk el- 
halyezni, do ezt korlatozz^k azok a te- 
nyek- bogy csak 8 sprite- ot tudunk 
am ugy is csak meg jeten item. tov6bba a 
kepernvonek is kel! levennunk abbol 
teruletet. a BASIC intarpratarnak iskeM 
terulet, s6t a sprVte-okat mozgat6 as 
f^lhasznalo programnak is kell teriifet* 
rgy egy oJyan 64 byte-os startclmet kell 
kivaJasztani, amely egyik teruletet sam 
zavarja^ legcdlszerGbb a BASIC prog 
ramterulat ale jet eholni annyiszor 84 
byte-tal, ahany sptita-nak kell terulet. 
2048 - aradetileg a BASIC-prograrn- 
larulet elaje. (Ez pontesan 32*64). Ef- 
foljuk ezt 64 byte-tal. Igy 2048+ 64= 
2112-t kapurtk. Odatesszuk a BASIC 
alaja^t: 

POKE 43 f t2112 + 1) AND 255 
POKE 44,(2112+1 )/256 
POKE 2112,0 
NEW 

Ezutan 2048-tdl elheiyezzuk a sprite 
adatait, vegul POKE 2040.32-vel az 1. 
sprite cimel beallitjuk a VIC - CHIP sza- 
mara, 

A tbbbt sprite elhelyezesevel es baallt- 
tasaval basonldkeppen jaf junk el. ide a 
masodik sprite rajzanak a cimet 2041 -re, 
a tiarmadikat 2042- re tegyuk igy to- 
vabb- 



LEV^LVALTAS 





Juniusi BIT- LET- (ink ben kbzoltuk Szolnoki B6la olvasdnk hozzdszdlfisdt a szoftverlopasokkal kap- 
csoiatos korabban megjelent irasainkra. A temaban egyeiare nem kaptunk ujabb leveleket, hanem 
Szolnoki B6la egyik ,,nr>egjegyz6aere", levelet kapott az Arfntettflr.A level masolataT, majd Szolnoki 
Bela valaszat is megkiildtek az erintettek S2erkeszt5segunknek. Mi meg ugy gondoltuk, hogy er- 
demes a levelvaltast napvilagra hozni. ime: 

Kedves Uram! 

Az Ot/et 1986. junius 26 -i szamanak 29. oidaian tesujtd v6lem6nyl o/vastam a DIGIT EXT 64-r61 az On hozzisz6ii- 
saban Mint a program alkotdja ugy ereztem, hogy erre reagalnom keif. 

A hozzaszdlasban feirtakbol sok mindennel egyetertek, en is furcsanak tartom, p&lda'ui, hogy mi6rt csak a kutf6Idi 
programokbol ten stager 4s miert nem terjednek itthon (legalabbis ht'vafafos csatornakon) az eredeti magyar prog- 
ramok. Bar en nem panaszkodhatom, a DIG IT EXT 64 -b 61 a Novotrade el6g }6 f org a f mat produkalt annak e/fenire, 
hopy az arat aiacsonyabbra is megszabhattik voina. 

A DIG IT EXT 64-r6l afkotott rossz vSfemSnydt nem eg&szen ertem. Vafd igaz, hogy az e/s6 sorozal (10 p&tdAny) 
bibs' s volt, de aki a hibas lemezzel jetentkezett, azonnal megkapta a j6 lemezt, s6t £n mag am vidikre is leutaztam 
kicserelni. A kezelesi utasitashoz egy ,.Adatkoz!6 lap "-ot mefl4keltem, ezekbdf sajnos nagyon keveset kaptam vissza F 
igy arra r hogy auiomatikusan csergf/em a m6g kintlev6 esetleges rossz p4ldAnyok3t ad at hiany&ban nem volt 
mddom. 

Azt irja, bogy 5 percig hasznalta a programot, a betdlte'si id6 pedig haromszoros volt (azaz 15 perc?) ftt sajnos 
valami tdvedis /ehet, mert enn£l linyegesen gyorsabb a betofiSs. De azoktdf, akikkel besziltem (mint va'sa'rfdkkaf} 
eddig mSg csak jo ve'leme'nyt hallottam a program r6i, inkibb azt, hogy k&dvvel hasznafjik, mint azt, hogy elment 
idle a kedvuk 

Feimerult bennem az a kerdis, hogy vajon On eredeti DIGIT EXT 64-et prdbitt ki? Ha igen, akkor mi6rt nem kirdezte 

meg leg ai abb telefonon (a kezete'si utas/tasban a telefonsza'm benne van), hogy mil lehet tenni? 

Az^Otletben leirt ve'feme'nyet kicsit ethamarkodottnak tartom. de legfQke'ppen suiyos hitelrontisnak, men 5 perces 

proba utan gyakorlatilag hasznalhatatlannak minQsftette. Felte'telezem, hogy nem hitefronta's 6s elfenpropaganda 

volt a celja. a hozzaszolasa nem if yen alaphangulatu, azonban a leirt szdnak a sulyM nem szabad figyelmen kivuf 

hagyni. 

Kerem ezen, hogy egyreszt legyen szlves belatisa szerinti mddon a program tdnyleges Srt4k4r6i meggy6z6dni 4s 
ennek megfelelden korrigaini az eihamarkodott v4fem6ny kovetkezme'nyett (pi egy hetyreigazlta's formSJ^ban). 
M4sr4szt kirem, hogy az eredeti lemezt is az adatkozid lapot sziveskedj4k elkufdeni, hogy postafotdultivai cser6i- 
hessem, vagy a cimet megadni. hogy szemSlyesen elv4gezhessem a cser4t. 
A levefem m$solatat az Otlet szerkeszt6sig4nek is elkuldbm. 
Budapest, 1986. junius 27. 

dr. Bikfafvi IstvSn 1124 Bp XII., P agony u. 8. 
Tisztelt B/kfalvi Istvan I 

Koszonettel vettem Ievel4t, es igyekszem arra jdl v&laszolni, hogy On is he/yre tudja tenni az Otietben az On prog- 
ramjival kapesofatos vileme'nyemet. Tala~n annyit mig, hogy v&rtam a reagilisokat 4s orulok, hogy a program 
szerzdje megkeresett, talSn n4h4ny fethasznAld is totlat ragad - ba*r eddig ez nem tort6nt meg ame/y minden 
k4ts4get kizJrdan bizonyiiani masok j6 v4lem4ny4t az On programj&rdl. 

MielStt belebonyolddnSk az On bltal foltett k4rd4sek rSsztetes megva'Iaszola'sa'ba. jobbnak tartom, hogy tisztizzak 
nihdny Te'lree'rtSst 4s leirjam azt a helyzetet, ahogy 6n a DIGtTEXT 64-gyel megismerkedtem. 

Bizonya~ra ismeri a BIT- LET Vaflatd rovatit, Nos, ismerdseim 4s bara'taim szimira 4n is szoktam n4ha „vallatni". 
Erre a N4metorszagban szerzett diplomam r a nyelvtudasom 4s bizonyos szamitAstechnikai jArtass4gom ad alapot, 
tudnii/iik, hogy esetleges nimet vagy egyib forrasbdl sz&rmazd programokrdl v4fem4nyt alkossak, Nos, igy kaptam 
egyik ismer6s6mt5l is kiprdbalasra egy lemezt, amefyen tobb szovagszarkesztd is volt, koztuk a DIGITEXT 64 is. 
A programot be is toitottem a g4pbe, majd rovid meniiva'ltisok utin a karaktertervezS r&szhez I4ptem. ahol a fei-. 
szdlitisra. hogy nyomjam meg a kivint biflentyOt, lenyomtam a CTRL-E-t r mire a program lemerevedett. Amr'g idiig 
jutottam, telt el a lent kb. 5 perc. Ezutan kikapcsoltam a gipet majd ujra beh/vtam a programot, ezuttal egyenesen 
az eldbb emlitett r4szhez ugrottam Megism4telve a mQveietet ism€t lemerevedett a program, Ekkor a folyamatot 
ujra v6gigcsinAitam, hasonld eredm6nnyel. 

Ebb6l kovetkezikr hogy h^romszor toitottem be a programot, es hogy a betolt4si id6t nem szAm/tva kb. 5 percat 
toitottem el a program tesztef4s4vef. De nem is dolgozhattam vele tdbbet, h/szen - igaz v6tet!enui- rogton a nekem 
odaadott program gyenge pontjira tapintottam. Ha erre csak egy 6ra mOlva kerult volna sor r akkor annyi id 6 a/att 
ment volna el a kedvem. Ef kell ismernie, hogy ha egy program ityen tufajdonsigokat mutal, elig az 5 perc is a 
v4lem4nyn yilvaniti shoz. 

Nem akarok ebbe most rSszfetesebben belemenni, mivel jdmagam is meggydz&dtem arrdf. hogy a nekem v4lem4nye- 
zisre adott program hibas volt. £n azonban ez ai apian fogalmaztam meg a saj^t v6lem6nyemet. Tulzdnak tartom 
ezirt levelinek ,,sulyo$ hitelront4s"-t emlegetS soraiti Csakis az 4n szemelyes viieminyemet irtam ie, az pedig 
mindenki sajatja. Mivel az4rt gondoltam arra, hogy egy hibas program nem feltitlenul mar ad az, a fekozolt favelem- 
ben oda is irtam. hogy („Persze lehet, hogy ez azdta mar jobb lett"). Egy4bk4nt 4n a programrdf ugy tudtam, hogy 
az egy a Muszaki Egyetemen fejlesztes aiatt alfd szdvegszerkesztd, nem pedig egy a kereskedelemben terjesztett 
program. 

MindezekbCi kovetkezik, hogy nem vagyok a program felhaszn&ldja, a program nines 4s nem is volt a birtokomban, 
csakis egy v4lemenyez6s ere/6/g. Mindamellett azdta - mig az On levele 4rkez6se elfftti - szem4lyesen gy6z6dtem 
meg arrdf, hogy van aki a jo DIGITEXT 64-et szereti 6s haszn4lja is. Ez azonban azut6n tort4nt. hogy a levelemet 
efkuldtem a BIT-LET-hez 

Rem6lem, hogy a leirt ak az On szamara is rivilagitanak a helyzetre, arra is, hogy eszembe sem jutott az, hogy a 
program Sftafam nem is ismert alkotdja' t bantsam vagy a program el/en $z£nd6kosan szltsam a ked4lyeket. A prog- 
ram a levelem megirisakor csak az4rt jutott eszembe, mivel belei/fett annak tartalmdba, de csak egy rovid meg/egyz4s 
erej6ig. hiszen az off a tobbhasdbos nyomtat6sban csupa'n 4 hasdbsort fogfai ef. SGl 4n inkibb arra gondolok, hogy 
sokan, most halfanak eldszor arrdi hogy m6giscsak van egy magyar szdvegszerkesztG. 

Budapest. 1986. Julius 9. Szolnoki B4f* 

Ami szerkeszt6s£gunknek a dologr6l alkotott velemenyet illeti. Mar Szolnoki Bela levelenek olvastakor fotmerult 
bennunk a ketelv r hogy vajon javasofjuk-e a lev^lfrdnak, hogy ezt a bizonyos r6szt torolje levelebflL Beszeltunk vele 
a dologrol, s mert meggyozott bennunket, hogy ha a level egyeb kerdesekben is az C velemenyet tukrozi, miert ne 
maradhatna benne az is. Nos, torzsolvasdink jdl tudjdk, hogy alapelvunk a v6lem£nyek nyilv£nitds£nak teljes sza- 
badsaga, ennek szellem£ben adunk hetyt a legsze'lso's^gesebb veleme'nyeknek is. (Term£szfetesen csak egy darabig. 
mert nem kivanjuk olvasdinkat ismetlCdC, elObbre nem jut6 v6fem6nyek tijra 6s tijra valo kozlesevel untalni ) 
Nos, a levelet tehdt viltoztatis n6lkut kozoltijk. Nem is banjuk kulonosebben. De ha mar megnyilatkozdsra kesztet 
bennunket a fenti levelvaltas, hat meg kell mondanunk, hogy nem ertunk egyel Szolnoki Belaval. Laglabbfs ami az 
otpweet lesxtOT illeti. Mem tudjuk. rnilyeri tiibaji vorl rr^n qj AHnlii prdbdlt Dighieat-nok, do a foJamliratt httw oldrndrtr 

Sy *2ovfrgczBfkeErt6 lehetna Jo. {A mknaJunk mOkodfl paid An yon tay6bk6nl ez a hiba tram ietoMknlk.) Ami sgytb- 
M a Dlg»t**(-*1 titan - nom roatJL L*h*l vele dolgotm [E soroklrtyji Is dolgwott ve^eO Van n£Mny krfejinetl \6 
lutajdongaga, 4 vanrtak nigyon itiryot hienyoKAgwr. S^pnoi a lelre* es n kipernyGfotijatoziii egyutl&stn firm ami ai 
*gy esomo dolgol a fefhratnaltinak. £*akr» a dnlgokra (p*ldAuJ prrnTalAd rbrmalumak bealllt&u) vigy rAlon u Idfik 
fioran * teJhgwnelo, vagy ?Bm. &#jnus Bit kail mondanunk bogy a DiglfeMl az egviX Jegjobb hftzai Veszi l£sQ home 
kaT&g&hijij gApre irot; ubvegsjerkurrf. S «z z mondfllmSr Szolnoki Rptl imjlano* mondandojanak ignz?dget bao- 
nyl'.ju S riodaaul azl Ll oozzA kell ten trunk, hogy ez s mlnfch^s nnm annyira h Digitoxl rtagyzter fie Agar, mlrtT inkabb 
vfirHnyiirul amatfirteget as hianyat b^envitja S Ha mar danjUa t torok Iroja, hogy »li-g \6\ itsmen a Digi)c*i-c!t. 
% hogy aolLat dokjoroti ia v«4e, angedids&^k mttq. \>qqy m ignzsiQ ^edveert azc in ho«at&gyo. hogy mindej ctak 
addig lenoit. amig raszatita mag it hogy moquimflfkedjon az EatyscrlpUfll Noa azoia s 0Jgrte?tt n ir KUpadrik" karxjli. 

A *r*rk*mrt& 
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s pEMOFiRftOt'ittO^ 

ifi L-PFEK < 1 6548 >• H#'£EK < 1 6.549 > ' R=L+256*H 

2@ POKE 16548, PEEK < R > , PEEK < R+ 1 > : POKE 1 6424 , L , H 4 _ _ .... , 

5fl POKE R .21 3 • 1 97 .214,127, 79 , 235 , 33 ,79,22, 35 , 2tf3 , 1 ^6 , 49 ,^51, 1 J , 3*: ,^4o, I 
1 35 , 203 i 26 J 323 1 1 7 5 , 48 , 7 , 1 8 , 205 ,21,6,19, 24 , 230 , 4 , 235 , 209 , 75 , 289 , 20 1 
60 R=R+ 41 ^ • 

70 POKE R , 33 , 40 , 64 , 54 , L , 35 , 54 , H ,195,0,1 
80 H= I NT ( R/256 > : L=R~-256*H 

90 POKE 1 64 1 5 , L , H • , . . , . - L . r 

c : iS r.(j=s : PRINTER Pro3ra.ni torlodiK , de a. Kwlc£SzoKiira.s Kika.P< 
1 = 1 TO 2000 ■> NEXT 
1000 NEW 



k!0"..* 



1 9 



:sola.si9 el ! ! = FOR 



5 REmmmmm^ 

0000000000800000000000000000000000000000000000 
1 0 L=PEEK < 1 6548 > < H-PEEK «■ 1 6549 > « R=L +256*H 
20 POKE 1 6548 , PEEK £ R > , PEEK < R+ 1 > 
30 0=192 ■ W=26 

40 P.EM Q : a. iftoz9-3.ta.ndo soroK sza.m4. W s "26 

175 - X0R R 
45 REM B 3. 1 r a. 

50 POKE 1 7390 , 42,73,64,46,8, 229 , 209 , 35 ,6,0,197,1,31,0, N , 237 
243 ,201 

55 REM J o b b r 4. 

68 POKE 1 74 1 4 , 42 , 73 , 64 , 46 , 0 , 1 7 , 255 , 23 , 25 , 229 , 209 ,43,6,0,197 
43 , 27 , 1 93 , 16 , 243 , 20 1 

78 FOR 1 = 1 TO 32 = R=CRLL < 1 7398 > : NEXT 
88 FOR 1 = 1 TO 32 : R=CRLL < 1 74 14 > : NEXT 
90 GOTO 70 



LD R, <DE> 
176, 18,35, 19, 193, 16 
1,31,0,14,237, 184, 18, 




5 , 61 , 24 t 2 



8008 

28 POKE 1 6548 ,16, 69 

3© REM.... Rz a.bla.K Ki-jelolese , ^ - . A - , 

1 ©0 DRTR2 1 3 , 253 , 225 , 42 , 73 ,64, 46 , 0 , 253 ,78,8, 253 , 1 26 , 1 , 1 7 , 32 , 9 , 1 6 ? , 48 , 4 , 

49,6,0,9,281 m 

1 1 8 DRTR62 , 32 , 253 , 1 58 , 2 , 95 , 22,0, 253 , ? 0 , 3 , 1 
1 20 DRTR253 , 78 ,2,1 3 , 6 ,8/1 75 , 20 1 

ill 0RTR2^ 

111 DITR205 , 237 , 67 b 253: 1 | 6 , 3 ] 253 \ 78 ; 2 \ 205 , 25 1 , 67 , 1 75 , 237 , 82 , 205 , 9 , 68 , 43 , 2 1 3 , 229 , 
209 , 43 ,197 , 205 ,21, 68 , 237 , 1 84 ,18,1 93 , 209 , 237 , 82 , 1 6 , 239 , k!8 1 

* * 1 _ -^-i- • I'm > ...... ~ 12. 237, 176,289, 

281' "' ' 



1 FJR DRTR205 - 237 , 67 , 285 , 9 , 68 , 5 , 1 97 , 2 1 3 , 229 , 289 , i , 32 ,8,9 , 285 ,21, 6S 
25 , 1 , 32*, 8 , 237 , 66 , 193 ,16, 232 , 8 , 229 , 209 , 1 9 , 205 , 2 1 , 68 , 1 1 9 , 237 , 1 7b , 
L. »? ... ............ 

253 , 1 26 , 3 ,253 , 78 , 2 , 285 , 25 1 , 67 



155 REM 
168 0RTR285, 



175, 237, 82, 285, 



9, 68, 5, 43, 197, 21 
1 , 32, 8, 9, 193, 16, 



^29/289 . 1 75 7 1732 . 8 , 2:37 , 66 , 285 ,21, 68 , 1 2 , 237 , 1 84 , 209 , 1 75 , 2o7 , m 
229,1 75 J 229 , 209 , 27 , 285 ,21, 68 ,119, 237 , 1 84 , 20 1 
208 FOR. 1 = 17389 TO 17596 
218 RER0 R^POKE I, R 
228 NEXT I 

225 X=5 ■ V=2 1 • DX=28 : DV=99 
238 POKE 1 7680 , X , V , DX , 0V 

235 POKE 17605, 5,21, 20, 50 = POKE 17610,5,71,20,49 
237 CL 8 : G0SUB 4808 * PR I NT* 10,7," G 11 ; CHR* < 1 4U >}" 1 9o5 . dec . , 

24ft GOSUB 3O0O r ^ 

250 FOR 1 = 1 TO 28 : R=CRLL. < 1 7437 , 1 7688 > : FOR -J=l TO 28 : NEXT J, I 
268 GOSUB 3088 

278 FOR 1 = 1 TO 28 : R=CRLL < 1 7468 , 1 7688 > : FOR J=l TO 20 ; NEXT J, I 
276 GOSUB 3088 

279* FOR I = 1 TO 1 88 = R=CRLL. < 1 7539 , 1 7680 > = NEXT 
280 GOSUB 3880 

290 FOR 1 = 1 TO 1 88 • R=C-RLL 1 7497 , 1 7688 > : NEXT 

308 GOSUB 3080 _ _ _ , _ . L1( _, ,. T . 

3 1 H FOR 1 = 1 TO 50 = R-CRLL < 1 7539 , 1 7605 > R=CRLL. < 1 7497 , 1 ? h 1 8 • NEX T 
328 GO^.l IB 3088 

338 FOR 1 = 1 TO 58 = R=CRLL <. 1 7497 , 1 7605 > R=CRLL < 1 7539 , 1 76 1 8 :« : NEXT 
50O GOTO 240' > 

3808 FOR I=m TO 3* : F0R J=0 T049~14*I 

38 1 0 S=;ET < 78+ 14*1+ J, 121+ J > : SET < 78+ 1 4* I + J , 121- J > : SET 1 1 68- -J- 1 4* I , 1 2 1 + J > ■ SET < 1 *>8-J~ 1 
4*1, 121- i> : NEXT J 
3828 NEXT I : RETURN 

480ft FOP T-71 TO 1 7 1 = SET < 39 , J > '> SET c 200 , J > = NEXT 

4^18 FOR J=39 TO 1 99 • SET C X> 71 > : SET <239-- J ., 1 7 1 > : NEXT : RETURN 

5888 R^=CHR*^ 12^+CHR*<:7>+CHR*<6>+CHR*<9>+CHR*C9>+CHR*<4> + H RuLL ,, +GHR^<28 / + " G ,, + 
CHR^<148> 
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Egy sokak altai mellozbtt szamitdgep, a PRIMO metlett szeretnek 
kiallni. N6pszeruseg6nek nbvekedesehez talan sikerul hozzajarul- 
nom a kovetkezfi n£hany programmal, otletteL 

A Token G2 nevu program megirasahoz Gal Tamasnak a tavaly 
decemberi BIT-LET-ben megjeJent programja adta az indittalast. 
L6nyeg6ben ezt a programot eg^szitettem ki egy kis otletteL (A prog- 
ram tehat a kulcsszavak kozvetlen k£perny<5re vitelSt teszi lehetfive.) 
(Hasznalatahoz tablazatot 6s abrat mar kbzoltunk lapunkban - 
A szerk.) 

Az eredetitfil ez talan egy kicsit konnyebben kezelhetb, mivel RESET- 
el6s utan nem kell ujra 6s ujra beirni azt az eredetileg megadott ne- 
hany sort. Itt a RESET miutan hasznalhatatlanna tette a programot 
ujra is Sleszti. 

A RESET-gomb benyomasakor ugyanis torltfdik a 4027 H -cimen 
talalhatb JP utasitas utan altalunk beirt ugrasi dm. Ezt kovetflen 
ugras lorteYiik a RAM 401 Eh cimen talalhato JP 100h utasitasra 
E? a dm leiszo'legesen atlrhato\ Az rtt meeadolt cfmen pedig olh&- 
Iye?h6t6 egy olyan szubrutln. ami a 4C27fj crmen tafalhato JP utan 
befrja a nefcunk megfeJeio cfmfct. JP TQ0 H -zal zarodik. Taimesze- 
teser. igy a B ASIC-program egyszeri Fefutasa utan nines tobbe szufc- 
s^S r £V szt torJl rS B7 sofban talalbard NEW ulasftas. (Kesz- 
seggel vallalom. hogy minden GfdeklGdGnak - kazatta 6s postakoft- 
s£g bi^TosItasa eseten - posiafordultavai erkuldarri a program g£pi 
k6du autostartos valtozatat.) 
A programbbl hianyz6 magyarazatok: 

5 helyfoglalas 
10-20 BASIC program kezdetenek atallltasa 

70 RESET-el6skor erre a programra kerul a vezeVI6s, 6s beirja a 

nekunk megfelelfl cfmet a 4027 H -en talalhatb JP utan. 
80-90 a 401 E H cimen talalhato J P 100 H utasftast frja at. 
A ROLL A 6s ROLLS nevu programok. a kepernyfi tartalmanak 
elforgateisat teszik Iehet6ve\ 
A: visszafrassal, B: torldssel, jobbra es balra. 

A 0ff0i kddu program egyszeri meghfvasa a kdpernydtartatom 8 graft- 
kus pcnttal tdrtfnfi eltoia&di erfidmeriyezk fgv a k^pernyo" el$Ot£tt- 
T^sehaz, vagy az egyszerr koTbeforgBtaahoz 32-sztif kef I meghfvnl, 
A valrozoban megadhatjuk. hogy a kepemyGtartfilom hany grafikus 
port szalessigi'j savjai fargassa a program bafra [feiultGf szamfrva), 
vagy jobbra (afuFroi s/amltva). Igy pi. elerheti. hogy a kepamyd feteo" 
1/3-a balra. az also 1/3-s pedig jobbra rnozduf el. mfg a kozepsfi 
1 /3 helyben marad. 

Q valtozbban megadhatjuk, hogy a Program A, vagy B tfpusu legyen. 
A kozolt valtozat A tfpusu, hogy B legyen ahhoz a Q <*rt£ket kell 
megvaltoztatni - lathatolag - 1 75-re. Nyilvan ebben az esetben a 
90-es sor is folosleges - tdrlendo. A programok fel^pfte"s6r6l: 

5 helyfoglalas 
10-20 BASIC program kezdete*nek atallftSsa 
50-60 a g6pi kddu programot tolti be 
Q: mozgatand6 sorok szama 

W: 26 - LD A. (DE) (a lees<5 byte-ot az A regiszterbe menti) 

175 - XOR A (a regisztert nullazza) 
Megjegyz6s: mivel a ke*t szubrutin (jobbra-balra; 17414, 17390) 
egymast6l fuggetlenek, igy Q^sW erteke kulon is bealh'thatd. A prog- 
ramot begepel^s utan ^rdemes kazettan rogziteni, mert egyszeri fut- 
tatas utan a helyfoglaio sor torf6dik. Futtatas utan RUN 30-cal 
i n dim at o u|r^ 

A ROLL (3 fantaiiana^u program az s\6i6 program tovabbfejtesz- 
xm valtozata, A program ssgttseg^vel tobb Cma^mum a k^perny6 
meretaval magagyezfi) "ablakot" definialhaturik es azok tartalmat 
a f^iranyokba eltolva (foL fa bafra. jobbra) sottos vaftoztathatjuk. 
Az ablak m&ret es helve 4 szammaJ egv^f^' m ^ en leFrhat6. 
X az ablak bal 106 sarfcanak vfzszinie« koordinataja. (Erteke max. 
?9, min. 0 lehet) 



Y; az ablak bal felsfi sarkanak fuggfileges koordinataja. (^rt^ke max. 

189, min. 0 lehet) 
(A 0,0 pozicio a k^pernyfi bal felsfi sarkaban van ) 
DX: az ablak szelessSge. 
(Erteke min. 2, max. SrtSke X-t6l fugg.) 
DY: az ablak magass^ga. 
{frteke min. 2. max. SrtSke Y-tol fiigg.) 
(Y 6s DY mer^szamat a grafikus pontok sz^ma adja. 
DX-nek 6s X-nek megfelelfi grafikus pontok szama pedjg egyenlfi 
8* DX. ilLS^X-el.) 

A program betciltesekof a k^pamytf unlfldik a o'otjram nevenek 
egy r^sze »nverzan jelemk meg, Ez annak kbazonhfiT6. hogy a PRIMO 
fife nevkd>nt olyan stringekftt is elfogad. amtk "specf^lis" karakterekeT 
is tarcalrnaznak. fgy p^, alfirheT^. hogy a program batoftSsckor az 
grnyfl torlfidjon, a prog ram ney tetsz^feges formaTumbfln ie I en fen 
meg, s^T a gap hangjelzilst is adhat a betoltes megkezdesekor. En- 
nek a iehatosdgnfcfc csak az szab hatarx, hogy a nev hossza max. 
1 6 karakter lehet a vez6rl6 karakterekkel egyutt. 
(Pf. 5000 A$ = CHR$(12) + CHR$(6) + CHRf (7) + "ROLL":SAVE A$) 
A program fel6pftes6r(5l: 

5-10 helyfoglalas a g^pf k6du rutinok szamara 

20 BASIC program kezdetenek atallltasa 

90-1 60 DATA- sorok tartafmazzak a g^pi k6dokat 
200-220 betoltSs 

225- X = 5: Y=21 : DX = 20: DY=99. 

230 POKE 1 7600, X, Y. DX, DY (az ablak definialasa) 



250 
270 
278 
290 



balra 1 7437 (p[. A=CALL(1 7437, 1 7600)) 
jobbra 17460 
le 17539 
fel 17497 

Az eltolas sebessege varakozo ciklusokkal Iassfthat6. Erre akkor 
lehet szuksSg, ha kulonbdzfi meretu ablakokat szeretnenk azonos 
sebess^ggel mozgatni. A vizszintes 6s fuggCleges mozgat^s sebes- 
sege azonos meretG ablakok eset6n is kuldnb6z<5. Figyelem! A ROLL 
A es B. valamint a ROLL G param6terez6si hibakat nem kepes le- 
kezelni ! 

A ROLL G eseten a parametereket ugy kell megvalasztani, hogy 

X+DX<=31, Y+DY>=191 legyen! 

Qeda GSbor. 3390 Fuzesabony, Felszabadulas u. 16. 
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MIKflOELEKTRONIKA: 

A jOvO a jelenben. 

FtLVEZETOK. 
INTEGRALT ARAMKOROK, 
MtKROPROCESSZOROK 
ES CSATLAKOZOIK. 




Cikkeinkben gyakran hivatkozunk la- 
punk alapelvere, miszerint a szerkeszto 
azert van ... stb. Nos, ez az alapelv sok- 
szor ugy ervenyesul, hogy az olvasok 
altal bekuldott anyagok adj&k lapsza- 
munk oldalainak egy reszet, masszor 
meg ugy, hogy az olvas6k kerdeseire 
adott valaszok, a kivansagok kielegite- 
se tolt ki lapot, lapokat. Annak idejen 
elhataroztuk, hogy a VC 20-as geppel 
nem nagyon foglalkozunk mert mar ,,ki- 
ment a divatbol", azutan a hozzank er- 
kezett levelek, telefonhivasok hatasara 
megvaltoztattuk ve.emenyunket, s 
elobb vallatot, majd VC 20 prolorrgalva 
cimmel cikkeket kozoltunk a Cbmmo- 
dore-ok doyenjevel kapcsolatban. Eleg 
regota hallgatunk e geprol r s most egy 
i f j u olvaso kivansagat kielegitve ismet 
a VC 20-asok t^boranak kedvezunk. 
Az olvaso az alig 13 eves WIelich Krisz- 
tian azt kerdezte tolunk leveleben, hogy 
hogyan lehetne programozni a gep 
F1-F8 billentyutt. Egy masik tbrzsol- 
vasonk Toth Geza, aki alig idosebb 
Krisztiannal most rovid gep. kodu prog- 
rammal valaszoi a kerdesre. Ez a prob- 
lema ugyanis kicsit bonyolultabb, mint 
azt Krisztian hitte, effele gepi kodu 
program nelkul ugyanis a dolog megold- 
hatatlan. Remeljuk, a program mas 
VC 20 tulajdonosoknak is hasznos, a gep 
rejtelmeibe beavatottaknak pedig tar- 
talmaz nemi programozoi tanulsdgot. 



A program bovitett vagy bovitetlen 
VC 20-szal egyarant hasznalhato. Be- 
toltes utan hasznalata a kovetkezo: 
RUIM-na! inditjuk, mire megjelenik a 
kepernyon egy kerdes: 
Hany betut taroljanak a bilientyuk? 
(30-110) 

Ez ertelemszeruen azt jelenti, hogy a 
nyoic billentyu osszesen 110 betut ke- 
pes tarolni es megjelemteni. A valasz 
megadasa utan megjelenik a READY 
felirat es megkezdhetjuk a bilientyuk 
programozasat. Ehhez az alabbi for- 
matumot ke!l hasznalnunk: 
ro)1,"T6th Geza programja" 
A ,,kukac" mellett alio szam termesze- 
tesen a billentyu szama. Ha netgn a 
szoveg nem fer ki mar (tehat tulleptuk 
a megadott karakterszamot), akkor 
ILLEGAL QUANTITY hibajelzest kapunk, 
s probalkozhatunk ujra annak a billen- 
tyunek a programozasaval amelynel 
eppen tartottunk. 

Ha elvegeztuk a bilientyuk programo- 
zasat, akkor a kovetkezokeppen hasz- 
nalhatjuk oket: 

ION - a programozott bilientyuk be- 
kapcsolasa 

SEND - a programozott bilientyuk ki- 
kapcsolasa (de a RUN/STOP+ RESTORE 
is ezt a hatdst valtja ki) 
Egy konkret pelda, amelybol egyeb er- 
dekes lehetosegek is kideriilnek. Beir- 



hatjuk peldaul egy billentyure az alab- 
bit is : 

fa) 1 ,"LOAD" +CHR$(13) 

Ha ezutan !OI\l-t Irunk, s megnyomjuk 

az F1 -et, a gep ugy veszi mintha a LOAD 

parancsot Irtuk volna a gepbe, s meg- 

nyomtuk volna a RETURN-t is, azaz el- 

indul a toltes. (Hiszen a CHR$(13) = 

RETURN) 

Ha a program beirasakor hibazunk, ak- 
kor futtatasnal ,,HIBA A PROGRAM- 
BAN" hibajelzest kapunk. Ha az ada- 
tokban (DATA-kban) hibaztunk, akkor 
pedig ennek megfelelo hibajelzest. 
A program mukodeserol : 
A program miutan megkerdezi a puffer 
meretet, kiszarmtja mennyivel kell a 
BASIC felso hatarat lejjebb tolni, hogy 
a program es a puffer elferjen. 
Az elso FOR ciklus a gepi kodu progra- 
mot tolti be (a "REM PR0GRAM"-t6l 
a "REM-ADATOK '-ig terjedo resz). 
A "REM ADATOK" utan kovetkezo DA- 
TA sorokban taroljuk a kezdocimtdl 
fiiggo byte-ok relativ helyet a program- 
ban es a kezdocimhez mert relativ tar- 
talmukat. (Peldaul JMP kezdoctm + 580, 
a JMP utan kovetkezo byte-okat ugy 
allitja be, hogy azok erteke K + 580 te- 
gyen.) 
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Megkozelitese. a tavalyi jarmuvekkel (ugymint; repulogep, 
bicikli, tengerjaro hajo), valamint tekintettel a Duna ko- 
zelsegere uszva, kajakozva. 

Mindezeken kivul odavisz meg a Keletitol a 7-es busz, 
a Nyugatitol a 12-es busz, a Deiibol a 18-as villamos. 

Autdparkolas az epulet elott minden mennyisegben. 
Ajt6nyitogatas: mindket napreggel 9-kor. Zaras: este 7-kor. 
Bel6p6: DIAKOKNAK. KATONAKNAK £S GYEREKEKNEK 
10 FORINT, MASOKNAK 20 FORINT. 

PROGRAMCSE REBERE 

Id6n 50 gephelyet kmalunk a cserebereloknek. Mindegyik- 
hez adunk tevet es csatlakozasi lehetoseget. A gdpet, 
tdrol6t Onnekkell hoznia! Egy asztalegy drdra 30 Ft- 

6rt berelheto. A berletek elojegyezhetok. Aki december 
5-ig lefoglalja a helyet maganak, az 20% arkedvezm6nyt 

kap. A helyfoglalast telefonon is, szemelyesen is intezhetik 
minden nap 9-tol este 9-ig a Csokonai Muvefodesi 
Hazban. Telefon: 690-495 es 892-240. A telefonos 
helyfoglalasok alapjan harom napig tartjuk a megbesz6lt 
gSphelyeket. Ez ido alatt be kell fizetni a b6rleti dijat sze- 
melyesen vagy post^n Postacim: Czerny Zsuzsa - Csoko- 
nai Muvelfid6si HSz 1153 Budapest XV., Eotvos u. 64-66, 

PROGRAM BO RZE 

Egy masik helyisegben azok berelhetnek aszta't aktk nem 
csereberelni akarnak, hanem sajat keszftesu programjaikat 
kivanjak arusitani. Szamukra 60 Ft/ora a b^rleti dfj 
A programbdrze teremben levo asztaiokra ugyanazok a 
b6rl£si mddszerek ervenyesek, mint a csereberere. 

J6 BORNAK is KELL A CEGER! 

A legjobb csereajanlat sem er serum i. ha nem jut el az 
erintettekhez. 

• Ezert hozta letre lapunk a programcserebere rovatot. 
E rovathoz ingyenes hirdeteseket veszunk fol a hely- 
szinen, s ezeket kesobb megjelentetjuk a BIT-LET-ben! 

• Ezert ajanljuk minim^lis t6rft6s6rt az alabbi reklam- 
eszkozdket ametyekkel b^rki kdzz6 teheti a rendezv£ny 
jellegehez illo tem^ju hirdeteseit! 



altai 



FENYUJSAG: 10 fonntert val!aljuk r hogy az on 
megadott szdveget 5-10 alkalomma! sugarozzuk! 

ROPCEDULA: on megadja a szdveget, mi a kfvant pel- 
dAnyszamban egydran belul atadjuk onnek ! A4-es lapon- 
kent 1 fonntert. A terjesztesben is szivesen segitunk! 

HANGOS REKLAM: on kitalalja, mi bemondjuk egy 
tizes6rt \ ■ 

SZENDVICS: azazhogy szendvicsembert is adunk, ha kell, 
vagy b3rmi mas extra dtletenek megvalosftas^ban segitunk, 
az arban pedig megegyezunk. 

BEMUTATOK 

Titokzatos terveink egyelore m6g csak tervek, ezert a be- 
mutatdk vegleges programjat majd a december 11-i 
Otfetben olvashatjak Terveink : a Macintosh rri£g miridig 
singer; Eszik, vagy \%mi\V. az Amiga-t (bemutat6 6s beszGl- 
get£s); Ablaktechnika a C64-en (avagy ilyen 8 GEOSV 
Hfvjuk fol aiegkozefebbiadatbankot (modembemutatd): 
IBM kompatibJis-e az IBM kompatibilis? Tov^bbi bemu- 
tatdinkra kulon kis pSIy^zatot (flunk ki. 

BESZtLGETESEK 

Szakertoink tanacsokat osztogatnak. Talalkozhatnak a 
BIT-LET, a Commodore Ujsag szerkesztoivef. 

GARANCIAK 

Az idei BiT ^rr Kar^icsony szrnvonaldnak garanciAja. hogy 
v6dn6kei a Novotrade az APISZ P rendezfli a Tavafyi G>keres 
rendezv6ny hi^igazdfijanak a a Csokonai Muvel<5d6si 
Hdznak a munkatSfsai. a BIT- LET szerkeszifisfige. s mind- 
ehhez jan m^g iden a sok rsndszv^nyen megedz6d6ti 
M^egyetemi Kozmuvelfid^si Trtk^rs^g a maga stabjaval. 

SZENZACI6? 

TSrgva^sok: folynak arrdL hogy a BIT- LET Kar^csony al- 
kalm3vaJ is sug^rozna eg&sz Budapesten foghatd ridi6- 
ad6 &z^mit6g6pes pfogramokatf 

■ 
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Dr Tokodi Jeno: A LASER mikro- 
sz^mltog6pcsal^d - LSI ATSZ, 144 
o , 1 40 Ft 

(A szerzo - a LASER g£pcsal3d 
home-computer kateg6riciju g6p6t v6- 
ve alapul - a gepek BASIC nyelv6nek 
jellegzetess^geit, gept k6du progra- 
moz£sukat 6s a perif6ri3k haszn&latcit 
ismerteti. A bemutat^st kapcsolasi raj- 
zok, valamint a tokenek, 6s a rendszer- 
valtoztik tablazatai eg^szitik ki.) 

Szilassy Bertalan: C programozasi 
utmutat6 - LSI ATSZ, 58 o.. 64 Ft. 
(A dinamikusan fejl<5d6 C program- 
nyelv egysegesft£s6re r hordozhat6v£ 
tetelere szolg3l6 javaslatok osszefog- 
lalasa szabvanyaj^nlat form£jciban.) 

Tudom£ny 6s technika Commo- 
dore 64 - DATA BECKER - Novo- 
trade, 263 o., 215 Ft. 
(A kbnyv a C 64 iskolai, egyetemi fel- 
haszn^lasahoz nyujt segfts6get. Ma- 
tematikai, termeszettudom^nyos 6s 
muszaki feladatok megoldas^ra mu- 
tat p6ld3kat j6 attekintest adva a g6p- 
pel megoldhat6 probl^mcikrol.) 

Varga Jozsef: Szem6lyi szarmto- 
ggpek kezel6se, programozdsa 6s 
alkalmazdsa - Terra, 326 o., 137 
Ft. 

Ugy tunik, hogy a Terra kiad6t elke- 
rult6k a mikroszamtt6gepek tomeges 
elterjed^serol szd!6 hfrek, 

A kotet cimlapja ugyan ennek ellen- 
kezfijet l^tszik igazolni, hiszen az a 
tegismertebb geptipusok bemutatcisat 
fgeri (C-64, ABC-80. HT 1080Z, 
-2080Z, TEXAS-99, Primo-32, 64, 
TV COMPUTER-32, -64, VT-16). 
Am belelapozva a konyvbe kiderul, 
hogy annak hangv^tele, stilusa olyan, 
mintha a szamft6g6pkezeles, a prog- 
ramfras meg mindig egy szuk szakmai 
korre tartozna, mintha az 6 privilS- 
giuma volna. Ha ez igy lenne, akkor 
a konyvet jo szivvel ajanlhatnank a 
csekely szamu v£jtfulunek, ok ha- 
szonnal forgathatnak. 
Ezt a benyomast er6sftik a szaraz 
hangvStelu, tudomanyoskod6 magya- 
razatok is. A sok gepet bemutatva a 
szerzfl teljessegre - vagy ahogy fogal- 
maz: az olvas6 horizontj^nak sz£lesf- 



tesere - torekszik Feleslegesen Tul 
sokat markol, hiszen ezekhez a gep- 
tipusokhoz a felhasznal6nak rendel- 
kezesere Ml a szukseges, joval resz- 
letesebb magyar^zatokkal ellatott 
BASIC kezikdnyv. Ilyen sok geprol 
ilyen kev6s informaci6ra val6szinuleg 
senkinek sines szuks^ge. A rengeteg 
elore-hatra lapozast igeny!6, bonyo- 
lult jeldlesrendszer sem segfti a k£nyv 
hasznalat^t. 

A kotet formaja. kinyitva, jobb oldalon 
olvashat6ak a C-64-re keszult prog- 
ramreszietek. tudnivalik magyarSza- 
tokkal ellatva. Bal oldalon pedig a 
tobbi geptfpusra vonatkoz6 m6dosft3- 
sok, a C-64-tol vald elteresek felso- 
rolSsa. Nos, a legreszietesebben be- 
mutatott C-64-rol mar szSmtalan 
konyv jeleni meg. melyek - t^rgyuk 
egys£gess£ge miatt - alaposabban 
mutatt^k be a g£p kezel£s§L progra- 
mozSs^t fgy a Commodore haszn£i6i 
nern sok Cijat tudbatnak meg a kotet- 
bflL A tobbi g^p kezei6i pedig mGg 
kevesebbet. hiszen a nekik sz6l6 n6- 
h^ny soros, tultomon'tett megjegyze- 
sek szinte attekinthetetlenek. 
Hoi lehet megis hasznos a kotet? 
TalSn az oktatasban, hiszen a szerz6 
maga is tankonyvnek nevezi mun- 
k^jat. 

N^zzuk elfiszdr az 6nall6 tanulast! 
Mit sajdtlthat el a konyvboi az olvas6 
segitseg nelkul? Az elso fejezet ne- 
gyedtk oldalarol egy peldaprogram: 
10 READ A$ 
20 DATA KIS ILONA 
30 PRINT A$ 
40 END 

Ehhez a magyarazat: ,,Programunk- 
ban kulcsszavak; READ (olvas), 
DATA (adat), PRINT (nyomtat). END 
(v6ge), valtozo: A$ es adat: KIS 
ILONA szerepelnek. Az A valtozo 
val6s sz^mokat a $ jellel kiegeszitve 
szovegeket (string) azonosfthat A 
program vegrehajtasat a RUN (fut) 
parancs indftja el. Az A$ valtozbhoz 
hozzarendeli a DATA keszletet (A$ = 
KIS ILONA), majd kepernyore irja 
A$ erteket. A programok END-del 
zarulnak." Hat aki a g6ppel eloszor 
tal^lkozva megerti. hogy mi is tor- 
t^nik - annak nines is szuksege arra, 



hogy konyvb6l tanuljon programoz- 
ni. 

Hol lehet megis hasznos a kotet? 
Esetleg, mint az iskolai sz£mtt3stech- 
nika-oktatas segedkonyve? Ismet egy 
rovid programreszlet: 
10 PRINT "SZAMITHATO: FELKA- 
MATOLT TOKE, DISZKONTALT 
TOKE, JARADEKOSSZEG, JARA- 
DEKTAG" 

1 5 PRINT "KOLCSONOSSZEG, TOR- 
LESZTOTAG" 

Ehhez hozz£fuzni sem kell semmit. 
Nem tudnt, hogy a szerz6tol vagy a 
kiad6t6l szarmazik ez a szerkesztSsi 
koncepci6 - illetve ez a koncepci6tlan 
szerkezet. Varga Jdzsef a terjedelmi 
keretek kozott mindent megtett, hogy 
bemutassa a g^peket - de ez egyetlen 
koteten belul, az osszes elterjedt gep- 
tipussal foglalkozva megoldhatatlan 
feladat. A bevezet6ben felaj^nlja az 
olvas6knak, hogy felmerulo probl6- 
m^ikra lev^lben v^laszbl. Felo, hogy 
a kozeljov6ben jelentosen meg fog 
n<5ni a levelez^se. 

Dachsel : Zenekonyv a Commo- 
dore 64-eshez - Data Becker- 
Novotrade, 151 o., 323 Ft. 

A kotet Ieend6 olvas6ja azt hihetnS, 
hogy ez a kbnyv egyarSnt szdl a ze- 
n§hez (Srtflkho? (zen^szekhez) H a 
sz^mJtdstechnik^val foglalkoz6khoz 
Vagy. ha mindk^l csoporthoz nern is. 
legal^bb az egyikhe? Hamarosan ki- 
derul azonban. hogy-sajnos - egyik 
otvas6i t^bor sem z^rhatja szfv^be a 
szerzot. 

A bevezeto meg sok sz^pet ^s jdt 
fg6r. Hosszu (es tartalmas!) eszme- 
futtatfis olvashat6 itt arrdl, hogy a 
..zens" fogalma, illetve az. hogy mely 
hangok egymAsut^njit 6s egyidejE 
hangzas^t tokintjOk zen^nek. meny- 
nyiben fugg az adotl kort6l. kultur^fis 
kbrnyezettSL divatttil. A leTrtak mind 
helytSll^ak. az elm^leti megalapo- 
z^ssal nem lehet probl^mSnk. Nyiivin- 
val6 a v^gkovetkeztet^s is: a hang- 
gpner^lfisra alkalmas szimtt6g§p is 
szolgAliathat z^t (B4r a meg- 
jegyz^s er6sen rnegk6rd6jelezhet6, 
mely szennt a C-64-be 6prtatt hang- 
chio ffil^r egy S2intetiz^torral.) 

o 




Van ^nekem" egy Commodore VC 20 tipusu sz&mhoge'pem, £gyszeruen nem 
tudok v&fc rafza/m. A graftkus kxrakfereket ismerem* de annki bonyoluitabb 
ahftit nem tudok kirafzomi a htipernytire, Hogy ei tehets&ges fegyen, kerem. 
hogy vagy az 0TLt7T-£tan, vagy esat/eg fait&lban VC-20-hoz mutassanak ra/zofd 
programokat. Etdre is koszonam* 

T&th Ptitsr, 4, a sit. tanufd, Dabraean h Jarifco o. 32. rV, 32. 

Jauasoljuk, hogy tanulminyoztf at a BIT-LET 1385. marnust szamkb&n megjalfHil 
1 1 yen iemaju tfkkunket- (Barmelyik nagyofob kdnyvta>baFi megtatAJod I] 
Mur&nyi Szubofcsnak hivnak, 13 $va$ vagyok, 2 fogfaikozom szamft&s- 
technikavat. Gondoftam. annyi ev utin mi&rt ne irhatnek en is agy Jat&kprogra 
mot. Beta is vagtam es mar az utotsd igazh&sokat vegzem raft a. A fatdk neve 
vagy Labirintus vagy Mants mag bos kiratyft ttisz Da a fat eh hoi xzuk&agvm tanne 
egy 25*3&-as hatterre a 25*40 hetyett (A jatek egyehktint € 18-o$on kaszuS} 
Azt szaretnam megk$rdezni> hogy hogy an Iehet ezt efernt programban es a 
program vegen ezt hogyan fehet megszuntetni 6s visszaaffftant a 25*40 &$ 
h£tt4rt? 

Javabba szaratnam magtudni. hugyan labat POKE -vat eiarni a magyar tikezetes 
betuket es van e ASCfl k6dfuk, ha nam iehet PKE-vat as ASCtt kdddaf eterta 
Skat, kerem kOfdfenek ttekem egy oiyan programot. ami magyar dkezetes betu- 
ket a/tit e/6. 

Mu r Any/ Szabolcs, 2400 Dunaujvaros* VSci M u. M XI/ 4. 

A? ESC*funkcidk segitsegih/erl jeJolhetunk kl ablakokat a k6perny6n Ecj v esinal- 
halunk pi. 25*30 us kapernydt a 25*40-es helyett : 

1 43 r\ J . 3i , ?4 ; C4 Eft* < £3*3 * " B " = REM ESe n '&" 
i I p&XHT " HttMrM 11 HHDHR*<ft7*>*3? t- n PEN ESC 11 ? 11 

m no :r^iHT tt n u j ? Loor 

|f9 R0-1 W'MI-lL KEPERr- ,l . r 0 ■ "N M 

E5C T - Az ablak false sark£nak kiioJbldsa 
ESC "9 ^ Az ablak alad aark^nak kijeloleae. 

Ami az &keze?es betOket J I fat i: Csak a special isan .^lokewiwt' C Iti-ospkon 
vannak ekezet^s bet Ok Ez^kre a gepekre ra Es agettek a megfeielo billentyukre 
a megfclelo betPket. Wyjlv&n. hogy ez eg yes ^fcezetes karaktereknek ezekqn a 
pepeker> ASCII ktidjuk is van. Ekazetes batfiket ganard16 szoftvart iahet kapni 
a C 16-osho? 9 2C uxletakban. Sajnos mi nam fogJamo^unk programed ktildasd^ 
yel. 



A NARANCS Dl'J-at eddig meg nem adtuk kL Most azert 
dontottunk ugy, hogy kiadjuk, mert az alabbi apro felfede- 
zest megmutattuk szinte minden C1 6-tal f oglalkozo ismerd- 
siinknek, baratunknak, s mindannyiuk szamara meglepS, 
uj es izgalmas volt az. A narancs dij az erkolcsi dicsosegen 
tul a kozolt anyag terjedelm6vel aranyban nem alio „extra" 
honorariumot jelent a fiatal szerzo szamara. 



A gondok akkor kezdodnek, amikor a 
szerzo mindezt a gyakorlatba pr6balja 
atultetni. Mar a hatodik kis minta- 
program is tomve van a (nem profi) 
programoz6 szamara ertetmezhetetlen 
DATA-sorokkal. Indoklas: ,,Ez a rovid 
BASIC-program megmutatja minden 
zeneprogram alapveto szerkezetet r 
mely a kovetkezo: egy rovid program- 
r6szlet (0-6-os sor) , es egy igen hosszu 
adatsor (DATA-sorok 7-tol 16-ig)" 
Az olvaso kenytelen elfogadni ezi a 
szerkezetet, remelve, hogy kesobb tbb- 
bet is megtud a DATA-sorok adatai- 
r6f. 

A szerzo alapallasa itt valik ellent- 
mondasossa. Egyreszt olyan tudast 
tetelez fel - mind a zene, mind a 
programozas teren ami korantsem 
nytlvanvalo Masreszt szajbarag6s - de 
atgondolatJan - peldakkal igyekszik 
megvilagitani a korabban mar ismert- 
nek feltetelezett fogalmakat 
[gy peldaul a hangchip mukodeset egy 
meglehetosen kodos metaforaval irja 
le, mely szennt szamozott irodaszo- 
bakban u\o alkafmazottak engedel- 
meskednek a (szinten szamokkal je- 
lolt) utasftasoknak. A leiras a POKE 
utasitas hatasat volna hivatott be- 
mutatni Ennek lenyeget a progra- 
mozast egy kicsit is ismero olvaso 
ugy is erti. Azok szamara viszont, 
akik a zene miatt vettek kezukbe a kb- 
tetet, es valoban szukseguk lenne \6 
magyarazatokra, a szerzo egy fel sort 
sem veszteget peldaul a FOR - NEXT 
ciklus mukodesenek leirasara - pedig 
ebbol mar a legelso programokban is 
nem egy talalhato. 

Hasonlo modszerrel folytatodik a zene- 
program irasanak bemutatasa: listaz- 
zuk ki a megadott sort, javitsuk ezt a 
szamot arra, emezT meg amarra, es 
1am! a gep ketszer olyan gyorsan 
jatsza le a dallamot De hogy miert? 
A szerzo azegyszolamu, BAStC nyelvu 
dallamok megszblaltatasatol vegul is 
eljut az assemblerben irt tbbbszblamu 
zeneprogramokig - ugyanilyen tar- 
gyalasmoddal. Mindezt rengeteg tab- 
lazat, es igen tomeny hangtechnikai 
leiras kfseri 

Azeneprogramozassal most ismerked6 
olvas6 csak igen kbrulmenyesen, sok- 
sok 6nal!6 kfserletezessel es mas 
szakkonyvek parhuzamos bongeszese- 
ve! hasznalhatja csak a kotetet Azok 
szamara, akik mar jol ismerik a hang- 
chip programozasat. hasznos Iehet 
kezikonyvkent. Reszukre viszont ele- 
gendo - es celszerubb is - lett volna 
egy 6sszefoglaJ6 tablazat- es infor- 
maciogyujtemeny kiadasa a laikuso- 
kat megtevesztb korit^s nelkul. 

Taller Jozsef 



A szerkeszto azert van, 
hogy a lap olyan f egy en, 
amilyenek az oivasoi! 



© 



A BIT-LET 1986. aprilisi szamaban a 
Hasznos aprosagok dmu cikkben 
megjelent mar egy elj^ras a NEW 
paranccsal vagy a RESET-tel kitorolt 
programok visszahozatal^rbl. A most 
ismertet6sre kerulo elj^rds azonban 
j6val egyszerubb, es kulon elonye, 
hogy a sorszSmokat sem Vciltoztatja 
meg. 

A program visszahozatala a 
POKE 4097,1 : RENUMBER 
paranccsal tortenhet. Az elso resz az 
$1001 -$1002 cfmeken talalhato mu- 
tat6 6rtek6t (mely egyebkSnt a 2. 
BASIC sor dm6re mutat) cillitja nem 
zeTus ert^ktlre. A RENUMBER parancs 
hatSscira pedig az interpreter a meg- 
felelo ert6kre ^llftja be a BASIC 
rendszervaltozbkat, de a program sor- 
szamoz^s^t nem vciltoztatja meg. Ez 
kulonosen akkor hasznos, ha v6letle- 
nul fejlesztes kozben torlodott a 
program pi. egy hib^san mukodo 
g^pi k6du szubrutin miatt. 
Grosz Attifa 5600 B6k6scsaba, Len- 
csdsi u. 8. 
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ik^Amiirtlr " 0(l«t id 9t molid *z4m*b*ni*l«n)Jt mag* add ig <* 
K O V ©IK 6 ZO S Zd mUflK m[ n&9 n ai fitlcit b*n a t Ami 1 1 ■ t«c bnl k » 



HARMAPGEPNYERO, AZ 1. FELAPAT MEGOLDASA: 



n szSmoknak van egy 



A feladat n6gy rtszbSt Ati. tmt> megoldAsai svrrMdben: 

1. Tattyi.* 'el az AINiassal eJlentetban, hogy van egy olyen network, mely minder i 0-1 sorozatot renaez. ae az i . z. 
olvan permuiSciAja. melyin nem .endez. «u egy nagvobb sorszAmu dr6ton kisebb ertek (jeloljuk ezt az Artdket m-mel) iikeak mint gy k.- 

S( »bb MiteSmtin A networkbk mGkadftsaUl nyNvSnvalrt. hogy na az . 2 m szSmok helyett 0-t, az m-H. m + 2. ... n szimoh helyett 1 -et 

"SSI rT* /nrt^rbe? rtfco,™ m db 0 pan, ode fog erkezni. ahova eredetileg az 1 .2 m szamok Arkeztek. az egyesek ped,g az m-nel 



Az addigieket egybevetve 

Ez ViSZOn! fi ' 



LSSTn. 3 -a r™MS5 S randez. Feltetelunkbai ellentmondasra jutottunk ezert az illltas igaz <Meg- 
■ ttamtffe fiYfttfnert. amikoraz Sllftts tagadasan^ Wwtetlens^t bizonyttjuk. ind.rekt bizonyltas! modszernek nevezzuk. A be- 



legyzeV ezi 0 blzonyltisj l 

IS^SjSiS ffl^iSSl^* valoban mindig rendez 4 szamot. a 0-1 lorvany segltsageval kon n yen lath atjuk. A 3 ibrin W 
faptf nXrkdt 4 banThat,uk a mostan, 1 «. abra sz«mt. Az elsfl resz rantf* kdon az also 4fe 1 MM 4 *2*$ 

A masik 3 rfsz mind szmten a 4-»s rendezo. de az elso 2 kapu ki^ieldvel. Nezzuk aUoor a_2. reSzt' Mivel fktor iud,uk. hogy ide a szamok 



- =s.ti™ van. mint az 1 -n, 6s a Q-on is =- = van. mint az 6-en. Igy ezi a 4 drolot [1 , ?. 



mar ugy erkeznek. hogy a 2. droton - =szan> van. mint az 1 -n, as a Q-on van. mini az can. igy szi a * Brow m .. * . 5. ») ez ? 'f z *g 

cgvmft i fife randezji- fogia. Emratt a kat legkisebb szam a hely6re karul Hasonloan a 3. rdsz rendezi egymfis kozt 1 1 3, 4. 7 6s 8 dr6iokat gy 
,Wt legnaoyohb is a heJy^e keriil. EzenklvGI a 2. r&izgondoskod.k arrdl. hogyazS. diAtor i - =sz4m legyen. mmt a o-on a 3 

mint a 4 en igy a 4. r^s^t tandezni fogja a 3. 4, 5. 6s 6 df6tokat. s ezzel a rendezfet tel,ess6 taszi. (Megiegyzts. a 



; legnagyoc 

2°3 V /s JXfc^S^lStwSalS I W^Xmli^3SS^^^t mOkodVsAnerisrnerateben «p 25 asatm kell alianCrizm.) 
3! Az allies nyilvanvalo. hiszen, ha az 1, 2 .n szimokal pont sorban adjuk be. akkor ugyanugv is fognak magSrkazni (mindinl gP""" U BV 
Jkeznek a szanuk. hogy a kisebb melmii drdton kisebb sz^m 6rkezik. Igy egy.k kapu se csaral I), rahSi akkor blztoa. hogy a kisebb sorszamu 

f UsdT^^'brirt! A k mGkod6s konnyen ellenorizhetfi a 0-1 torveny segftsagavel. figyelembe veve a szimmetriat eleg azokat az aietekatki- 
prdbalni. amikor maximum 3 db 0-s van. HSzi feladat {nem bekuld6sre): frjunk olyan programot. mely szimulAIni tudja egy tetszoleges network 
m0kod6s6t. s a 0-1 torveny seglts^gevel leellenorzi. hogy rendez<5-e ! 
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0/ pdfyAzatunk hSrom hdna- 
pos, s dlja egy COMMODO- 
RE PLUS 4-es g4p. A kovet- 
kezd Mrom hdnapban kozolt 
Mrom feladatban legtobb 
pontot szerz&k kozt suiyo- 
zott mddszerG sorsol&st tar- 
tunk majd. Az elsd feladattal 
szarezhetd maxima* lis pont- 
sz&m 70 pont. 
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1, FELAPAT 

Sok gyakof laii probl^ma megdld*is^it*l merui fel, hogy egy ugynevezett grdfon 2 pont kozott 
I6gf6videbfa utat kell kef«rii (pi. a C 16nyerS2. feladatdban, ^rt6ke!6s^t I. ebben a sz^mban). 
A grafok olyan ..dolgok", ahol van n^hiny pont, amiket csucsnak nevezunk, s minden lehet- 
s^ses pontpfirra meg van adva. hogy osaza vannak-e kotve, vagy nem. Az els5 esetben azt 
mondjuk. hogy a kit osuea kdzott megy dL a masodik esetben azt, hogy nem megy. Ezenklvul 
megenga^juk. hogy az a^ekre egy egy sz*m Tegyen irva, ami pi. a k6t pont kozti ut hosszdt, 
vag y valami hasonldt jftlkepezF A Jegrovidabb ut keresese azt jelenti, hogy kijeldlunk egy kezdd- 
4s egy vegpontot, s e( ak^runk jutni a kezddpontbdl a vegpontba vdgig elek menten ugy, hogy 
az ut aita! erint^tt elekre irt szamok d&szege & lehetfi legkisebb legyen. 
Legrovidebb ut keresdsdre va!6 a kovetkezS, Dijsktrat6l szdrmazd algoritmus: 
Ez az algoritmus egy elore kijelolt kezddpontb6l minden mas pontba keresi a legrovidebb utat. 
A csucsokat cfmkezni fogjuk, m6gpedig kdtfele clmke lesz: vegleges es kfsdrleti. A vdgleges 
eimkere rnindtg az odavazeto legrovidebb ut hossza (az elekre Irt szSmok dsszege) lesz Irva, 
mlg a ktserleti clmkefc caak f e1a5 koriatot adnak ugyanerre. 

6 I4p*fs: a kezd5pont kapjon egy vegleges clmket, melyre 0-t irunk. Az osszes tfibbi csucs 
kapjon egy kiserletf clmket, melyre a kezdopontbol hozzdvezetd 6lre irt szdmot frjuk, ha van 
ilyen 4t, kulonban l**^fc (Masiegvzes: szamltdgepes megvaldsftds esetdn a g6p Altai &br&- 
zolhatd szamok kdzul a legnagyobbai szokas ide Irni.) 

7 lip&s - Keresaunk egy otyen klserlati cimkas csucsot, melyre a Iehet6 legkisebb szam van 
Srva, ( Ha tobb liven van, azak kozul velasszunk ki egyetl) Ennek a csucsnak a cfmkejdt vdgle- 
geskjiik figy r hogy ugyan&z maradjon ralrva. Ha nines tobb klserleti cfmkds csucs. dlljunk 

T*Mp4s: M6dositsuk a kls^rleti cfmkdketl Ha a most veglegesftett csucsbdl vezet 61 valamely 
kfs6rleti cfmkes csucsba, s az erre az dire Irt sz6m 6s a most veglegesftett cfmk6re Irt szam 
osszege kisebb a kfserleti clmkeYe Irt sz6mnal, akkor ezt az osszeget Irjuk a klserleti cfmke>e. 
(Ezt minden klserleti cfmk^s csucsndl meg kell vizsgalni I) Menjunk az 1. Iep6srel 
A Mmdat az, hogy _ 
7. Bizonylesuk be; ha minden elre pozitav szdm van irva, akkor Dijkstra algontmusa jol mu- 
kodfk, tchat ledllaskor minden csucsnak a cimkejdn valdban az o da vezet <3 legrovidebb ut 
hossza lesz (ill. +«. he nem lehet a kezd6pontb6l az i I let 6 csucsba eljutni). 

2. Az algoritmus vegrehaitBsfl soran hiny ossznaddsra 6s h6ny dsszehasonlftasra van szukseg? 
(A grafnak n csticea van. Eleg korulbeluHs 0 

J. Mit ketl tennunk, ha nemcsak a legrovidebb ut hosszara, hanem magdra az utra is klvancsiak 
vagyunk? Prdbaljuk Ogy modosftani az algoritmust, hogy vegrehajt^sa ut6n ezt is le lehessen 
olvasni valahonnan. Mennyivel noveli ez a !6p6ssz6mot? 

Pribelszky PAI £h 



Szerkeszt6s6gunk cfme; 0TL£T Budapest 1966. Szerkesztfi: Angyalosi L^szld. MGv6szeti szerkesztC 
Tordelo: Domokos Imre. Hfrrovat; Csa"nyi Gyorgy, Vallatd: PogSny Gyorgy. G6pnyerC: Kiraly Zoltfln. Pasta: Hal^sz Peter 



